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ABSTRACT 


A  microprocessor  development  system  (MDS)  for  the  Intel 
8748  microcomputer  was  designed  and  built  around  the  Naval 
Postgraduate  School's  TRS-80  computer  system.  This  MDS 
provides  the  capability  to  use  the  TRS-80  as  an  editor  to 
write  and  edit  8748  mnemonic  programs  and  store  them  on  a 
magnetic  disk.  Also  developed  was  an  assembler  to  convert 
the  user  generated  source  program  into  object  code.  As  a 
final  step,  a  software  driven  hardware  programmer  has  been 
constructed  to  enable  the  object  code  to  be  loaded  into  the 
Erasable  Programmable  Read  Only  Memory  (EPROM)  on  the  8748 
microcomputer  chip. 
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I .  INTRODUCTION 


The  Electrical  Engineering  (EE)  Department  at  the  Naval 
Postgraduate  School  operates  a  small  but  growing  micro¬ 
processor/microcomputer  laboratory.  This  laboratory  supports 
several  EE  courses  in  microprocessor  applications  as  well  as 
student  thesis  efforts.  Since  the  primary  thrust  of  these 
efforts  is  the  implementation  of  microprocessors  in  operat¬ 
ing  circuits,  the  most  useful  tool  to  have  available  is  the 
microprocessor  development  system  (MDS) .  Such  a  system  will 
typically  allow  the  user  to  write  microprocessor  programs 
in  assembly  level  language  using  a  keyboard  and  cathode  ray 
tube  (CRT)  to  provide  for  clarity  and  ease  of  editing.  The 
MDS  will  then  assemble  the  assembly  level  language  into 
machine  language  and  provide  the  capability  to  program  an 
Electrically  Programmable  Read  Only  Memory  (EPROM)  with  the 
newly  generated  program.  Additional  features  normally  avail¬ 
able  on  an  MDS  are  a  debugging  facility  which  allows  for 
dynamic  operation  of  the  program  structure  and  an  In-Circuit- 
Emulator  (ICE)  to  enable  the  MDS  to  plug  into  the  circuit 
under  trial  and  act  as  the  microprocessor  with  memory.  The 
system  presently  available  in  the  EE  laboratory  for  this 
purpose  is  built  around  the  Tektronix  8002  development  sys¬ 
tem  which  has  modules  for  the  Intel  8080  and  the  Motorola 
6800  microprocessors.  Because  of  the  availability  of  this 
development  system,  most  projects  have  been  designed  around 
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the  8080  and  6800  microprocessor  which  until  recently  have 
been  representative  of  industry  standards  in  an  8  bit  word 
size  machine. 

As  an  additional  applications  tool  the  school  has  ob¬ 
tained  a  number  of  Intel  8748  microcomputers.  This  single 
"chip"  computer  provides  a  complete  system  in  one  package 
and  is  useful  particularly  for  controller  oriented  applica¬ 
tions.  A  more  detailed  description  of  this  chip  is  provided 
in  the  next  section. 

Because  of  the  usefulness  of  the  8748  and  the  lack  of  a 
software  controlled  development  system  it  was  decided  to 
design  and  build  an  MDS  for  the  8748  using  the  TRS-80  micro¬ 
computer.  The  TRS-80  had  also  been  recently  acquired  by 
the  EE  department  and  expanded  to  include  64K  bytes  of 
memory,  mini  disk  drive,  and  a  printer  interface. 
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II.  INTEL  8748  MICROCOMPUTER 


A  majority  of  the  Central  Processing  Units  (CPU)  on  the 
market  today  are  microprocessors  only,  requiring  many  sup¬ 
port  chips  such  as  bus  controllers,  clocks,  RAM,  ROM,  and 
input/output  (I/O)  ports  to  allow  for  a  functioning  computer 
system. 

The  Intel  8748  is  technically  more  than  a  microprocessor. 
It  is  in  reality  a  microcomputer  and  is  advertised  as  such. 
The  8748  microcomputer  is  therefore  a  significant  deviation 
from  the  support  chip  philosophy,  trending  instead  toward  a 
complete  and  self-contained  system  on  one  chip  of  silicon. 
While  such  a  trend  will  provide  for  an  increased  miniaturiza¬ 
tion  of  many  components  and  systems,  such  closed-end  units 
have  only  limited  capability  to  be  expanded  for  larger  ap¬ 
plications.  For  this  reason  a  market  will  always  exist  for 
the  support  chip  philosophy. 

The  8748  microcomputer  is  actually  a  development  tool 
intended  for  use  in  engineering  design  for  systems  which 
will  eventually  be  equipped  with  one  of  several  microcom¬ 
puters  in  the  Intel  MCS-48  product  line.  The  other  members 
of  the  MCS-48  family  contain  varying  capabilities,  all  of 
which  require  off -chip  memory  or  factory  programmed  ROM. 

The  8748  contains  all  of  the  capabilities  of  the  other  chips 
but  utilizes  a  IK  on-chip  EPROM.  This  EPROM  allows  the 
8748  microcomputer  to  be  used  to  perfect  the  program  for  a 
given  system,  or  it  may  be  reused  for  many  different  applica- 
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tions  by  erasing  and  reprogramming  the  EPROM.  Thus,  the 
8748  is  an  excellent  tool  for  use  by  students  in  project 
work. 

The  architecture  of  the  8748  microcomputer  can  be  seen 
in  Figure  1.  This  design  utilizes  NMOS  technology  to  achieve 
the  following  capabilities: 

1.  CPU  with  8  bit  word  handling  capability. 

2.  IK  x  8  EPROM. 

3.  64  x  8  RAM  for  data  registers  (in  two  banks) . 

4.  27  I/O  lines  normally  used  as  3-8  bit  I/O  ports. 

5.  8  bit  event  counter. 

6.  Single  +5  volt  power  supply  requirement. 

7.  8  level  working  stack. 

8.  RC,  LC,  crystal,  or  external  frequency  source 
for  clock. 

9.  Single  step  mode  for  use  in  debugging. 

10.  40  pin  dual  inline  pin  (DIP)  package. 

By  selecting  a  6  MHz  clock  crystal,  the  8748  operates 
with  an  instruction  cycle  of  2.5  microseconds.  This  speed 
is  on  a  par  with  the  fastest  of  the  CPU  chips  presently  on 
the  market,  particularly  when  it  is  considered  that  70% 
of  the  8748  instructions  are  single  byte  and  the  remainder 
are  only  2  byte.  This  compares  with  many  of  the  major  CPU 
chips  which  have  2  and  3  byte  instructions . 

The  following  pin-out  from  Reference  1  describes  pin 
utilization: 
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Figure  1  -  Intel  8748  Architecture 


Ground 
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ss 

VDD  Programming  power  supply 

V  5  volt  power  supply 

v  C 

P10-P17  Port  1 

P20-P27  Port  2 

DBq-DB7  Bus 

TO  &  T1  Testable  input  pins 

INT  Interrupt  input 

RD  Output  read  strobe 

RESET  Input  to  initialize 

WR  Output  write  strobe 

ALE  Address  Latch  Enable 

PSEN  Program  Store  Enable. 

Used  during  fetch  to 
external  memory. 

SS  Single  step  input 

EA  External  Access  input. 

Forces  all  program  memory 
fetches  to  external  memory. 

XTAL  1  One  side  of  crystal  input 

or  input  for  external 
clock. 

XTAL  2  Other  side  of  crystal 

input. 

The  instruction  set  for  the  Intel-8748  consists  of  96 
total  instructions.  These  instructions  all  execute  in 
either  2.5  or  5  microseconds  when  using  the  6  MHz  crystal. 
Over  half  of  them  execute  in  a  single  cycle.  Many  of  the 
instructions  are  designed  to  handle  BCD  and  single  bit 
operations  for  controller  oriented  applications.  Figure  2 


is  a  good  picture  of  how  the  data  transfer  instructions 
interact.  Reference  1  contains  a  complete  description  of 
both  the  hardware  and  software  for  the  8748. 
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Figure  2  -  Data  Transfer  Instructions 


III.  TRS-80  MICROCOMPUTER 


The  TRS-80  microcomputer  is  a  small  hobby  and  business 

computer  sold  nationwide  by  Radio  Shack  franchises.  At  the 

time  of  this  writing  the  company  is  credited  with  having 

sold  over  135,000  units,  making  it  the  leader  in  total 

computers  sold.  The  TRS-80  is  built  around  the  Zilog  Z-80 

microprocessor  which  is  an  evolution  from  the  Intel  8080. 

The  TRS-80  has  several  different  levels  of  capability  based 

on  a  building  block  approach.  The  lowest  block  available 

is  the  keyboard/computer  with  only  4K  of  RAM  and  a  very 

simple  BASIC  language  capability.  The  highest  block  is 
•  •••#••• 
that  which  is  currently  available  in  the  EE  lab's  model. 

This  includes  a  total  64K  of  memory  and  disk  BASIC  which  is 

loaded  into  the  RAM  from  a  mini-disk  (5%"  diskette)  drive. 

The  TRS-80  is  a  memory  mapped  system  providing  fixed 
addresses  for  various  preprogrammed  functions  such  as  video 
display.  Figure  3  shows  the  64K  system  memory  map  and  re¬ 
veals  which  portions  of  memory  are  available  for  general 
user  use,  normally  the  highest  48K  of  RAM.  The  preprogram¬ 
med  functions  are,  of  course,  in  ROM.  The  user  accessible 
RAM  is  dynamic,  with  a  450  millisecond  access  time  and  a 
refresh  period  of  2  milliseconds .  Figure  4  shows  a  macro 
block  diagram  of  the  TRS-80  system. 

The  TRS-80  in  this  configuration  uses  an  operating 
system  (OS)  called  TRSDOS  (TRS  Disk  Operating  System) . 
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Figure  3  -  TRS-80  Memory  Map 


-80  System  Block  Diagram' 


This  OS  is  analagous  to  the  operating  systems  used  on  large 
computers.  It  enables  the  user  to  communicate  with  the 
computer  using  only  high  level  languages  and  relieves  him  of 
the  need  to  manage  such  computer  housekeeping  functions  as 
where  to  store  programs  and  interfacing  the  CPU  with  the 
I/O  and  storage  devices.  Thus,  the  machine  level  language 
operations  are  normally  transparent  to  the  user.  Programs 
written  in  Z-80  machine  language  can,  however,  be  loaded 
and  run  in  the  TRS-80  using  two  different  methods.  One  is 
to  load  the  machine  language  from  a  "system"  tape  which  has 
the  program  already  loaded  on  it.  The  other  method  is  to 
use  the  BASIC  command  POKE  (address,  value)  to  load  one 
word  at  a  time.  *  It  is  interesting  to  note  that  the  vari¬ 
ables  in  the  POKE  command  must  be  in  decimal,  which  means 
converting  all  addresses  and  program  instructions  from 
hexadecimal  to  decimal. 

The  Postgraduate  School's  TRS-80  system  also  includes 
an  "expansion  interface."  This  unit  interfaces  directly 
with  the  computer  and  contains  32K  words  of  the  total  64K 
possible  memory.  It  also  has  a  number  of  bus  outputs  which 
provide  for  parallel  printer  output,  disk  drive  operations, 
RS-232  serial  I/O  and  a  full  system  bus  for  user  access. 

Since  the  computer  lab  already  had  a  very  good  line 
printer  in  the  Teletype  model  40,  it  was  decided  to  utilize 
this  printer  for  the  TRS-80  output.  The  model  40  is  an  RS- 
232  serial  data  unit,  however,  and  the  original  TRS-80 
provided  no  serial  output  for  listing  of  programs.  Instead, 
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Radio  Shack  sells  several  printers  which  are  driven  by 
the  TRS-80  parallel  output.  The  first  attempt  at  interfac¬ 
ing  was  conducted  as  part  of  a  student  thesis.  This  project 
involved  construction  of  a  parallel  to  serial  conversion 
device  using  standard  Universal  Asynchronous  Receiver  Trans¬ 
mitter  (UART)  techniques.  Unfortunately,  the  TRS-80  does 
not  output  a  carriage  return  on  its  printer  bus .  Both  the 
carriage  return  and  line  feed  are  driven  by  the  line  feed 
output  in  the  Radio  Shack  printers.  Since  both  signals 
are  required  individually  to  drive  the  TTY  printer,  it  was 
necessary  to  use  an  Intel  8748  microcomputer  chip,  in  con¬ 
junction  with  the  UART,  to  provide  a  carriage  return  each 
time  a  line  feed  was  recoqn^iz.ed .  on  the  bus.  while  this  de¬ 
vice  did  allow  for  output  to  the  printer,  it  had  a  persist¬ 
ent  problem  of  also  inserting  random  line  feeds  which  re¬ 
sulted  in  undesirable  appearing  printouts. 

It  was  decided,  shortly  after  the  parallel-serial  con¬ 
version  device  failed  completely,  to  purchase  Radio  Shack's 
RS-232-C  interface  unit.  This  saved  many  manhours  of  addi¬ 
tional  engineering  effort  and  provided  for  trouble-free 
printer  output.  One  drawback  to  using  this  serial  output 
method  is  that  the  unit  is  driven  via  special  software  which 
must  be  loaded  into  user  RAM  each  time  the  system  is  powered 
up.  The  small  machine  language  program  to  accomplish  this 
is  initially  stored  in  the  highest  portion  of  memory  and 
then  write  protected  to  prevent  the  system  from  putting 
other  data  in  those  memory  locations.  This  memory 
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protection  feature  is  part  of  the  operating  system  and  is 
implemented  on  power  up  by  answering  the  question  MEMORY 
SIZE?  with  a  decimal  address.  All  RAM  above  that  address 
is  then  locked  out  of  being  utilized  for  BASIC  programs. 

The  assembly  level  language  program  required  for  operation 
of  the  serial  printer  output  is  provided  in  Appendix  A. 
Several  switch  selections  on  the  RS-232-C  board  allow  the 
TRS-80  to  also  be  used  as  a  terminal  for  another  computer 
at  several  different  baud  rates.  Reference  2  provides  fur¬ 
ther  details  on  operation  of  the  RS-232  unit. 

The  disk  BASIC  language  used  in  this  machine  is  a  very 
capable  high  level  language.  The  commands  are  simple  and 
straightforward  while  providing 'maximum  capabilities',  it 
is  especially  strong  in  the  number  of  commands  available 
for  manipulating  "strings"  of  alphanumeric  characters.  This 
ability  made  BASIC  an  excellent  choice  in  this  MDS  applica¬ 
tion  References  3,  4  and  5  contain  the  BASIC  commands 
available  along  with  descriptions  and  sample  applications. 

While  the  user  of  the  MDS  system  does  not  normally  re¬ 
quire  knowledge  of  DOS  or  system  commands,  there  are  sev¬ 
eral  which  might  be  of  use.  To  give  a  better  picture  of 
how  the  different  modes  interact  with  one  another,  the  map 
in  Figure  5  is  provided.  To  get  from  one  operating  mode 
to  another,  code  words  provided  in  this  map  are  typed  and 
"ENTER"  is  depressed.  In  the  case  of  going  from  the  8748 
editor/assembler ,  the  words  "press  BREAK  key"  are  not  typed. 
Rather  there  is  a  key  in  the  upper  right  hand  corner  labeled 


TRS-80  Disk  Operating  System  (TRSDOS) 


Disk  BASIC 


r 


8748  Edltor/Assembler/Programner 


A 


Press 
BREAK  Key 


READY 


CMD  "S" 


V 

DOS  READY 


8748  EDITOR/ 
ASSEMBLER  ON 
LINE 

A 


RUN  "EDTASM" 


READY 


BASIC 


"BREAK."  Holding  this  key  down  for  several  seconds  will 
cause  program  execution  to  halt.  The  word  READY  will  then 
be  printed,  indicating  the  system  is  in  BASIC  mode. 


The  primary  commands  useful  to  the  MDS  user  while  in 
TRSDOS  are  listed  below: 


DIR  (A) 

LIST  (filename) 

KILL  (filename) 

FREE 

BASIC 

While  in  the  BASIC  mode 
usable: 


Lists  all  user  files  stored  on 
the  disk. 

Lists  all  user  files  along  with 
the  space  taken  up  by  those 
files. 

Prints  the  contents  of  the 
file  on  the  CRT. 

Erases  the  chosen  file  (file¬ 
name)  . 

Lists  total  disk  space  remain¬ 
ing.  (Each  diskette  holds -48 
user  files  and  44  maximum 
granules.  For  a  further  dis¬ 
cussion  of  files  and  granules 
see  Ref.  4.) 

Transfers  to  the  BASIC  mode, 
e  following  commands  are 


CMD  "S" 

KILL  (filename) 
LIST 


Transfers  to  TRSDOS  mode. 

Erases  file  (filename) . 

Prints  present  program  on  the 
CRT. 


Runs  the  program  currently  in 
TRS-80  memory. 

Loads  and  runs  the  8748 
editor/assembler . 

Commands  to  be  used  in  the  8748  editor/assembler  mode 

are  covered  in  the  next  several  chapters. 


RUN 

RUN  "EDTASM" 


IV.  MICROPROCESSOR  DEVELOPMENT  SYSTEM  SOFTWARE 

Once  the  topic  for  this  thesis  had  been  selected,  most 
of  the  bounding  parameters  were  automatically  defined.  The 
choice  of  the  Intel  8748  defined  the  assembly  level  lang¬ 
uage  to  be  used.  Selecting  the  TRS-80  as  the  computer  sys¬ 
tem  in  which  to  implement  the  microprocessor  development 
system  defined  the  majority  of  the  hardware  as  well  as  the 
programming  languages  to  use.  The  major  decisions  remaining 
to  be  made  involved  what  capabilities  to  include  in  the  MDS . 
The  components  normally  present  in  a  typical  MDS  are  listed 
below: 

•  •  *  1 .-  Editor 

2.  Assembler 

3.  Debugger 

4 .  EPROM  Programmer 

5.  In  Circuit  Emulator  (ICE) 

Because  of  the  finite  time  available  to  carry  out  this 
project,  it  was  decided  to  concentrate  on  the  components 
which  were  an  absolute  requirement  to  provide  an  ability 
to  implement  a  programmed  8748  microcomputer.  For  this 
reason  an  editor,  assembler,  and  EPROM  programmer  were  in¬ 
cluded  as  the  most  essential  tools.  Additional  hardware 
and  software  room  has  been  left  in  the  project  to  allow 
future  student  projects  to  concern  the  debugger  and  ICE  as 
additions  to  this  MDS.  As  a  possible  adjunct  to  the  MDS, 
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groundwork  was  also  laid  for  a  software  driven  EPROM  pro¬ 
grammer  for  the  Intel  2708  and  2716  chips.  These  EPROMs 
would  not  normally  be  used  with  the  8748  microcomputer,  but 
their  prevalence  at  the  school  for  other  applications,  along 
with  a  paucity  of  easy  to  use  programmers ,  made  such  an 
addition  to  the  MDS  desirable.  Unfortunately  time  did  not 
allow  for  completion  of  that  effort. 

For  the  software  portion  of  this  project,  it  was  decided 
to  use  the  BASIC  language  capability  of  the  TRS-80  rather 
than  the  Z-80  machine  language.  While  the  machine  language 
would  have  been  more  efficient  and  would  have  executed  faster, 
the  use  of  BASIC  was  selected  primarily  due  to  the  consider¬ 
able  and  time  consuming  effort  required  to.  write  the  soft-  . 
ware  programs  in  assembly  level  language. 

The  BASIC  software  is  broken  down  into  four  different 
programs  rather  than  loaded  as  one  large  program  for  several 
reasons.  First,  it  was  desired  to  minimize  the  amount  of 
system  memory  taken  up  by  the  operating  program  to  allow 
for  maximum  room  for  8748  program  lines  and  comments.  Sec¬ 
ondly,  calling  another  program  into  memory  is  made  especial¬ 
ly  simple  with  the  disk  system  because  the  storing  of  data 
and  loading  of  programs  is  so  straightforward  and  rapid. 

Third,  the  function  of  the  editor,  assembler,  and  EPROM 
programmer  are  different  and  independent  of  each  other. 

Fourth,  the  writing  of  each  program  is  simpler  if  it  is  an 
entity  independent  of  the  other  programs.  Thus,  the  soft¬ 
ware  for  the  MDS  is  broken  up  into  the  following  programs: 


24 


EDTASM 


MASTER 

ASSEMBLE 

PROGRAM 

A.  EDITOR  PROGRAM 

The  first  portion  of  this  thesis  was  development  of  the 
editor  for  use  in  entering  the  Intel  mnemonic  code  for  the 
8748  into  the  MDS.  CJse  of  mnemonics  is  an  integral  part  of 
an  MDS  because  writing  the  programs  for  the  8748  or  any  other 
computer  would  be  a  difficult  and  time  consuming  task  if 
machine  language  were  used.  The  major  advantage  of  mne¬ 
monics  is  that  they  have  an  English  language  meaning  while 
machine  language  is  simply  a  string  of  numbers  in  one  of 
several  possible  bases. 

In  addition  to  providing  a  neat  format  for  entering 
mnemonic  instructions,  the  editor  provides  many  operator 
aids.  Among  these  useful  aids  are  an  "edit"  mode  to  allow 
for  changes,  additions,  and  deletions  to  the  program  text; 
a  comments  column  to  allow  the  operator  to  describe  what 
various  program  steps  do;  and  a  capability  to  store  the 


Loads  the  printer  serial  output 
machine  language  program  into 
memory  and  loads  and  runs  the 
editor  program. 

Editor  program.  Provides  for  input¬ 
ting  and  editing  of  8748  assembly 
language  programs.  Transfers  to 
assembler  upon  command. 

Assembles  8748  mnemonics  to  machine 
language  represented  in  hexadecimal 
format.  Provides  CRT  printout  of 
errors.  Also  provides  hard  copy 
printout  of  assembled  program. 

Converts  assembled  hex  code  to  decimal 
and  outputs  to  the  programmer.  Veri¬ 
fies  EPROM  is  correctly  programmed. 
Reads  EPROM  upon  command. 
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program  under  development  on  magnetic  disk  for  further 
editing  at  a  later  time. 

The  operating  format  for  the  editor  program  is  apparent 
by  examining  the  flowchart  in  Appendix  B.  The  program  is 
written  to  provide  for  a  number  of  modules,  each  of  which 
operates  independently  of  the  other.  Figure  6  shows  the 
relationship  of  these  modules. 

To  begin  editing  a  program,  the  operator  first  loads 
the  system  as  described  in  Appendix  E.  When  the  statement 
"enter  mode  selection"  appears  on  the  CRT  the  operator  first 
types  in  INPUT  to  enter  that  mode.  INPUT  is  repeated  on 
the  CRT  to  confirm  to  the  operator  that  he  is  in  that  mode. 
Using  the  mnemonics  listed  in  either  Ref.  1  or  Ref.  6,  the 
desired  assembly  level  program  for  the  8748  is  entered. 
Correct  format  for  these  line  entries  is  accomplished  by 
using  the  right  arrow  key  (-*>)  on  the  TRS-80  which  provides 
a  tab  to  columns  at  8,  16,  24,  32,  40  and  48  spaces  across. 
The  first  column  contains  only  labels  consisting  of  one  to 
six  letters  and  followed  by  a  colon  (:).  If  no  label  is 
used,  this  column  is  left  blank.  The  second  column  contains 
the  opcode  of  the  desired  instruction.  The  third  column 
contains  the  operand  applicable  to  the  opcode  selected.  The 
operand  must  be  in  decimal  rather  than  hex  code  for  quanti¬ 
ties.  In  the  case  of  addresses,  the  operand  must  be  a  one 
to  six  letter  label  which  will  be  used  to  point  to  the  cor¬ 
rect  address  during  assembly.  The  fourth  column  is  available 
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Figure  6  -  Editor  Program  Block  Diagram 


for  any  comments  the  user  may  desire  to  include  for  the 
purpose  of  describing  program  operations.  These  comments 
must  be  preceded  by  a  semicolon  (;)  to  prevent  the  assembler 
from  confusing  comments  with  operands.  If  the  operand  is 
longer  than  the  8  spaces  available  in  the  third  column,  the 
comments  are  started  after  several  spaces  instead  of  pressing 
the  tab  key  to  the  fifth  column. 

Because  of  the  large  amount  of  memory  required  to  store 
comments  it  is  desirable  to  limit  both  the  length  and  num¬ 
ber  used  to  a  minimum.  Also,  the  TRS-80  allows  for  single 
strings  of  a  maximum  256  bytes  in  length.  Since  each  pro¬ 
gram  line  (including  comments)  is  stored  as  one  string,  the 
256  byte  limit  will  be  exceeded  if  too  long  a  comment  is 
included  and  the  error  "string  too  long"  will  appear.  This 
will  result  in  the  system  dropping  out  of  RUN  and  back  to 
BASIC  mode.  If  this  occurs,  all  data  previously  entered  in 
memory  will  be  lost  when  the  program  is  reinitiated.  If 
this  or  any  other  error  results  in  the  program  "bombing,"  a 
READY  will  appear  on  the  CRT  indicating  the  system  is  in 
BASIC  mode.  To  get  back  into  the  editor/assembler  again 
simply  type  RUN  "EDTASM" . 

Once  the  complete  program  has  been  entered  using  the 
input  mode,  it  is  desirable  to  check  for  errors  in  the  edit 
mode  by  typing  EDIT.  If  the  user  were  confident  of  his 
input  he  could  simply  enter  FILE  (filename)  which  transfers 
his  8748  program,  complete  with  comments,  to  disk  storage. 

The  filename  used  with  this  command  can  be  any  group  of 


letters  from  one  to  eight  in  length.  One  space  must  be 
allowed  between  FILE  and  the  filename  when  typing  it  in. 

Another  option  for  leaving  the  input  mode  is  to  enter 
QUIT  which  puts  the  program  back  in  the  command  mode  after 
resetting  the  pointer  to  zero.  This  command  causes  all 
previous  lines  written  to  be  lost. 

Assuming  the  user  went  directly  from  the  input  to  the 
edit  mode,  the  next  logical  choice  of  action  would  be  to  type 
PRINT  and  check  the  program  listing  on  the  CRT  for  errors. 

In  the  event  the  program  is  too  long  to  fit  on  the  screen 
the  rapid  scroll  can  be  halted  by  pressing  shift  and  @ 
simultaneously.  The  scroll  is  started  again  by  striking 
the  space  bar  (or  any  other  key) . 

When  entering  the  edit  mode  the  editor  pointer  will  be 
pointing  to  the  first  line  in  the  program  and  that  line  will 
be  displayed  on  the  CRT.  The  pointer  can  be  moved  by  using 
the  following  commands: 

UP  Moves  the  pointer  up  one  line. 

DN  Moves  the  pointer  down  one  line. 

EOF  Moves  the  pointer  to  the  end  of  the  file. 

TOF  Moves  the  pointer  to  the  top  line  of  the  file. 

The  command  "L  /substring/"  is  used  to  move  the  pointer 
to  the  location  of  the  first  line  in  the  text  which  contains 
the  exact  substring  located  between  the  slash  (/)  lines. 

One  space  must  be  provided  between  the  "L"  and  the  first 
"/".  Note  that  no  quotes  (")  are  actually  used  in  this 
command.  The  length  of  the  substring  is  not  critical  but 
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it  should  be  long  enough  to  ensure  the  program  does  not 
locate  another  line  with  that  same  short  substring. 

Once  an  error  is  located  and  the  pointer  is  at  that 
line  the  following  commands  are  used  to  make  corrections : 

C  /substring  1/substring  2/  Replaces  all  of  sub¬ 

string  1  with  all  of 
substring  2.  Again,  one 
space  must  be  inserted 
between  the  "C"  and  the 
•*  first  "/". 

DEL  Deletes  the  entire  line. 

INS  Provides  for  insertion 

of  a  new  line  above  the 
current  pointer  position. 

When  all  editing  has  been  completed,  the  operator  would 
use  the  command  FILE  (filename)  again  to  place  the  program 
on  the  disk.  If  assembly  of  this  program  is  then  desired, 
the  command  ASM  (filename)  is  entered.  A  single  space  must 
be  inserted  between  the  "ASM"  and  the  filename.  This  results 
in  the  program  "filename"  being  stored  on  the  disk  under  the 
name  "STORE"  to  enable  the  assembler  program  to  know  which 
file  to  assemble.  The  assemble  program  is  then  loaded  into 
memory  from  disk  storage  and  executed. 

B.  ASSEMBLER  PROGRAM 

This  program  has  the  responsibility  for  converting  the 
assembly  level  mnemonics  into  hex  code.  The  TRS-80  auto¬ 
matically  converts  the  hex  code  to  binary  for  loading  into 
the  EPROM  on  the  computer  chip.  This  is  an  extremely  lengthy 
program  which,  without  a  great  deal  of  sophistication,  exam¬ 
ines  each  mnemonic  in  turn  and  assigns  the  correct  hexadecimal 


code  for  further  action.  The  basic  flowchart  for  ASSEMBLE 
can  be  seen  in  Appendix  C  and  the  program  listing  is  in 
Appendix  H.  The  following  variable  usage  is  assigned  for 
this  program: 

X(L)  Full  line  from  editor. 

T  Full  line  but  with  comments  deleted. 

BK  Number  of  bytes  in  a  given  opcode. 

. *  ■  •  ■  •  ■  - 

D(L)  Byte  number  in  decimal. 

HX$ (L)  Byte  number  in  hex. 

V (I)  Label  (if  any). 

Y(L)  Hex  code  for  opcode  with  2  byte 

instructions . 

Z(L)  Hex  code  for  opcode  with  single  byte 

instruction  or  data  for  2  byte  instruc¬ 
tions  . 

U (L)  Error  for  line  L. 

The  first  task  carried  out  by  this  program  is  to  load 
the  desired  8748  mnemonic  program  into  memory  from  the  disk. 
The  next  step  is  to  complete  the  first  pass  of  the  assembler 
Each  line  of  input  is  looked  at  in  sequence.  The  first  8 
spaces  of  the  line  are  examined  first  to  determine  if  that 
line  has  a  label.  If  it  does,  the  label  is  stored  in  mem¬ 
ory  for  use  by  the  second  pass  assembler  in  determining 
intra-program  directives.  The  next  step  is  to  examine  the 
first  line  for  the  opcode  ORIG.  If  this  code  is  present, 
the  operand,  which  is  the  user's  desired  start  address,  is 
stored  for  use  in  beginning  the  byte  count  at  that  address. 
The  program  then  checks  each  opcode  in  sequence  to  see  if 


it  is  a  one  or  two  byte  instruction.  The  appropriate 
number  is  added  to  the  present  instruction  address  to  deter¬ 
mine  the  next  instruction  address.  When  the  opcode  END  is 
recognized  the  first  pass  is  completed  and  no  address  is 
assigned  to  that  line.  If  the  opcode  END  is  not  present, 
the  program  merely  exits  to  the  second  pass  assembler  after 
the  line  count  number  reaches  that  number  which  was  passed 
from  the  editor. 

As  each  line  is  looked  at  and  an  address  is  assigned 
in  the  first  pass,  that  line,  with  numbering,  is  printed  on 
the  CRT  to  keep  the  operator  aware  of  assembly  progress. 

The  format  for  this  printout  is  as  follows: 

LINE  NUMBER  HEX  ADDRESS  MNEMONIC  CODE  COMMENTS 

Upon  completion  of  this  phase,  FIRST  PASS  COMPLETED  is 
printed  on  the  CRT  and  the  second  pass  of  the  assembler 
begins  automatically.  The  task  of  the  second  pass  is  two¬ 
fold.  First,  the  mnemonic  opcode  and  operand  are  converted 
to  the  appropriate  machine  language  in  hex  code.  Second, 
each  time  an  operand  is  located  which  requires  an  address, 
the  label  representing  that  desired  address  is  searched  for 
in  the  list  of  labels  formerly  made  up  in  the  first  pass. 
When  the  label  is  located,  the  corresponding  address  is 
used  as  the  second  byte  of  the  calling  two  byte  instruction. 
As  an  example,  consider  the  following  lines  of  program: 


Line 

Address 

Code 

Label 

Opcode 

Operand 

03 

03 

0407 

JMP 

BACK 

04 

05 

8909 

MOV 

R1 ,  #9 

05 

07 

59 

BACK 

ANL 

A,  R1 
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In  this  example  the  programmer  desires  to  jump  to  line 
5  upon  executing  line  3.  When  the  second  pass  reaches  line 
3  it  first  recognizes  the  opcode  JMP  and  assigns  the  approp¬ 
riate  hex  code  of  04.  The  assembler  then  looks  for  what 
address  to  JMP  (jump)  to  and  looks  at  the  operand  BACK. 

The  program  then  searches  through  the  labels  tabulated  dur¬ 
ing  the  first  pass  and  locates  BACK.  It  then  brings  the 
address  associated  with  that  label,  07; ‘back  to :  add  onto  ther 
JMP  code  to  form  the  two  byte  instruction  0407  as  seen 
above.  The  code  column  in  this  example  is  not  added  until 
the  second  pass  is  actually  completed. 

The  actual  search  process  of  the  second  pass  is  done 
in  two  steps  to  increase  speed  of  execution.  Except  for  a 
few  singular  instructions,  the  first  look  is  at  38  groups  of 
instructions  by  tyne.  Once  the  opcode  group  heading  is 
recognized,  the  assembler  jumps  to  a  subroutine  which  as¬ 
signs  the  specific  hex  code  for  that  opcode  and  operand. 

Upon  completion  of  that  step  the  assembler  returns  to  the 
beginning  of  the  opcode  list  to  begin  again.  An  attempt  has 
been  made  to  arrange  the  opcode  groups  so  that  the  more 
frequently  used  will  be  at  the  top  of  the  list  to  provide 
faster  average  locating  speed.  During  this  process  the 
assembler  also  identifies  errors  which  are  filed  for  display 
when  assembly  is  completed.  The  recognized  errors  and 
meanings  are  listed  below. 

SYNTAX  ERROR  Opcode  or  operand  are  not 

recognized.  Probably  an 
incorrect  format  or  mis¬ 
spelled. 
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DATA  EXCEFPS  BYTE  SIZE  A  number  greater  than  255 

is  being  used. 

REGISTER  SIZE  EXCEEDS  7  Use  of  a  non-allowed 

register . 

R  EXCEEDS  1  Register  should  be  0  or 

1  only. 

INCORRECT  PORT  #  Use  of  port  not  allowed 

in  that  instruction. 

During  execution  of  the  second  pass,  as  the  code  for 
each  line  is  generated,  it  is  presented  on  the  CRT.  Again, 
this  presentation  is  provided  to  the  operator  so  that  he 
can  follow  the  progress  of  assembly.  After  assembly  is  com¬ 
pleted,  that  fact  will  be  noted  on  the  screen  along  with 
the  statement  0  ERRORS,  or  the  number  of  errors  followed  by 
the  line  number  of  each  error  and  the  error  found  in  that 
line.  If  the  line  printer  is  connected  and  turned  on  prior 
to  the  end  of  assembly,  a  printout  will  be  provided  which 
will  list  the  following  data  for  the  entire  program: 

Line  No.  Hex  Address  Hex  Code  Label  Opcode  Operand  Comments 
See  Appendix  J  for  a  sample  assembled  program  printout. 

Errors  that  were  detected  will  be  printed  below  the  line 
affected.  At  the  end  of  this  printout  a  tabulation  is  pro¬ 
vided  for  reference  listing  the  labels  and  the  address  they 
are  located  at.  If  no  errors  were  detected,  the  program 
then  loads  the  object  code  (machine  language  hex  code)  onto 
the  disk  and  calls  the  program  PROGRAM  for  the  purpose  of 
programming  the  assembled  code  into  an  8748  EPROM.  This 
code  is  filed  under  the  name  assigned  by  the  user  but  with 
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an  "0"  appended  to  the  name  after  the  last  letter.  This  0, 
of  course/  represents  object  code. 

If  upon  completion  of  the  assembly  and  printout,  errors 
had  been  detected,  the  editor  program  is  called  and  run  to 
enable  the  operator  to  correct  his  mistakes. 

Under  the  circumstances  where  the  operator  had  either 
accidentally  or  deliberately  failed  to  connect  the  TRS-80 
to  the- line* printer  and  to  turn  the  printer  on,  the  system 
will  "freeze  up"  after  assembly  is  completed.  The  recovery 
procedure  is  to  press  the  "BREAK"  key  until  READY  appears 
on  the  screen.  The  system  is  now  in  BASIC  mode.  If  errors 
have  been  detected  and  the  user  wants  to  examine  the  line 
numbers  in  which  errors  existed,  he  can  enter  the  command 
RUN  and  use  the  shift  key  and  @  key  simultaneously  to  stop 
the  scroll  of  assembled  lines  to  check  errors.  To  return 
to  the  edit  mode  again,  simply  allow  the  assemble  program 
to  continue  to  run  until  it  calls  the  edit  program,  or  press 
the  break  key  to  return  to  BASIC  mode  and  type  RUN  "EDTASM" . 

It  should  be  noted  that  if  ASSEMBLE  runs  to  completion 
and  does  not  locate  any  errors  it  will  automatically  load 
the  object  file  onto  the  disk  before  proceeding.  If  any 
errors  are  located,  however,  the  object  code  will  not  be 
saved  since  it  is  not  correct. 

C .  PROGRAMMER  PROGRAM 

The  purpose  of  this  program  is  to  enable  the  system 
user  to  load  his  assembled  program  into  the  EPROM  of  an  8748 
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microcomputer.  This  is  accomplished  through  associated 
hardware  which  is  discussed  in  the  next  chapter.  This  pro¬ 
gram  and  hardware  also  enables  the  user  to  read  an  8748 
EPROM  in  order  to  verify  its  contents.  The  flowchart  for 
the  program  named  "program"  is  located  in  Appendix  D  and 
the  program  listing  is  Appendix  I. 

This  program  is  normally  executed  upon  successful  com¬ 
pletion  of  the  assembly  program,  but  may  also  be  entered 
directly  from  BASIC  mode  by  typing  RUN  "PROGRAM" .  Before 
running  this  program,  however,  the  programmer  assembly  must 
be  connected  to  the  TRS-80  I/O  bus.  This  connection  should 
not  be  attempted  while  a  program  is  running  because  elec¬ 
trical  transients  may  be  generated  which  could  halt  program 
execution. 

When  the  program  is  initiated  it  will  first  present  the 
statement  ENTER  PROGRAM  MODE.  The  user  may  then  select  one 
of  the  following  commands: 

STOP  Ends  program  execution  and 

returns  to  BASIC  mode. 

EDIT  Loads  and  runs  the  editor  program. 

RPROM  Used  to  read  an  EPROM. 

WPROM  (filenameO)  Used  to  write  to  an  EPROM.  The 

"0"  must  be  added  to  the  file¬ 
name  to  designate  the  object 
file. 

Any  other  command  will  result  in  the  statement  ILLEGAL 
COMMAND — TRY  AGAIN  being  presented  on  the  CRT. 

Whether  the  WPROM  or  RPROM  mode  is  selected,  the  same 
setup  routine  is  used.  This  routine  first  asks  the  question 
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START  ADDRESS  IN  DECIMAL?  to  which  the  operator  answers  with 
a  decimal  number  indicating  the  EPROM  address  in  the  8748 
he  desires  the  reading  or  writing  to  start  at.  The  next 
question  will  be  END  ADDRESS  IN  DECIMAL?  which  asks  for  the 
last  EPROM  address  to  be  read  or  written  to.  If  the  end 


address  entered  is  greater  than  the  start  address ,  the 
statement  ILLEGAL  ADDRESS  will  appear  on  the  screen  followed 
by  the  start  address  question  again.’*  Likewise’,  if  either'  *  '* 
the  start  or  end  address  are  greater  than  the  1024  byte 
capability  of  the  EPROM,  the  statement  ILLEGAL  ADDRESS  will 
again  appear.  If  the  first  two  questions  are  answered 
satisfactorily  the  next  question  EPROM  SOCKET  EMPTY?  (YES 
OR  NO)  will  appear.  This  is  to  ensure  that  the  EPROM  is  not 
inserted  in  the  socket  before  power  is  applied  and  initial 
setup  is  completed.  Other  actions  could  result  in  damage 
to  the  8748  chip.  If  the  answer  to  the  socket  empty  ques¬ 
tion  is  YES,  the  next  question  will  be  IS  POWER  SWITCH  ON? 

(YES  OR  NO) .  If  power  is  not  yet  on  this  is  the  time  to 
turn  it  on.  When  the  answer  to  this  question  is  YES  the 
program  sets  the  hardware  to  the  required  initial  conditions 
and  prints  the  hexadecimal  code  of  the  object  program  about 
to  be  loaded  on  the  CRT.  The  statement  INSERT  8748  CHIP 


AND  TYPE-GO:  is  then  presented.  It  is  especially  important 
here  that  the  8748  chip  not  be  inserted  incorrectly  in  the 
socket  as  considerable  damage  to  the  chip  would  result. 

Once  the  command  GO  is  typed  and  entered,  the  program  will 
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return  to  either  the  RPROM  or  WPROM  routine  originally 
selected. 

If  RPROM  had  been  selected,  the  desired  address  of  the 
EPROM  would  be  queried  and  the  data  at  those  addresses  in¬ 
put  to  program  memory.  Since  this  data  is  input  to  the 
BASIC  mode  in  decimal  format,  it  must  be  converted  to  hexa¬ 
decimal  before  presenting  to  the  operator  on  the  CRT.  This 
presentation  is  made  in  the  following  format: 

Decimal  Address  XX  XX  XX  XX  XX  XX  XX  XX  XX  XX  XX  XX  XX 

XX  XX  XX 

where  the  decimal  address  is  the  address  of  the  first  in¬ 
struction  in  that  row  and  XX  is  a  hexadecimal  representation 
of  the  machine  language  in  that  address.  When  all  desired 
addresses  have  been  printed,  any  spaces  left  in  that  row 
will  be  filled  with  00  and  the  program  will  reinitialize 
the  electronics  in  the  programmer  and  provide  the  message 
REMOVE  EPROM  NOW — THEN  TURN  POWER  OFF.  This  is  to  ensure 
power  is  not  turned  off  before  the  EPROM  is  removed.  The 
program  then  returns  to  start  with  the  statement  ENTER 
PROGRAM  MODE. 

If  the  user  had  originally  selected  WPROM  and  given  the 
correct  name  of  the  object  code  file  on  disk,  the  first 
step  would  have  been  the  loading  of  the  object  file  into 
TRS-80  memory.  The  initialization  routine  discussed  above 
would  then  have  been  completed  and  the  programming  process 
commenced.  The  program  is  loaded  into  the  EPROM  one  byte 
at  a  time.  Each  address  requires  approximately  100  milli- 


seconds  to  program  so  the  user  should  expect  about  one  second 

of  programming  time  for  each  10  instructions.  During  the 

100  msec  cycle  the  program  first  inserts  data  into  the  given 

address  and  then  reads  that  same  address.  The  decimal  num- 

b* ”  read  is  compared  by  the  program  with  the  number  which 

should  have  been  programmed.  If  the  two  numbers  are  not 

identical  the  EPROM  programming  ceases  and  the  statement 

PROGRAMMING  ERROR— ERASE  EPROM  AND  TRY  AGAIN  will  appear, 

•  •  •  • 

followed  by  REMOVE  EPROM  NOW — THEN  TURN  POWER  OFF  and  a 
return  to  program  start.  If  this  does  occur,  the  most 
likely  cause  is  that  the  EPROM  was  not  thoroughly  erased 
before  programming.  It  is  also  possible,  however,  that  the 
EPROM  is  defective  or  that  the  programmer  is  operating 
incorrectly.  Check  also  to  see  that  programming  power  is 
turned  on. 

If  no  errors  are  detected  in  the  verification  routine, 
the  statement  PROGRAMMING  COMPLETED  SATISFACTORILY  will  appear 
followed  shortly  by  REMOVE  EPROM  NOW — THEN  TURN  POWER  OFF  and 
a  return  to  program  start. 

If  the  user  desires  to  run  several  RPROMs  in  succession 
or  an  RPROM  followed  by  a  WPROM  or  vice  versa,  it  is  not 
necessary  to  remove  and  reinsert  the  8748  chip  each  time. 
Simply  ignore  the  command  to  remove  the  EPROM  and  proceed 
with  the  steps  in  order.  The  questions  EPROM  SOCKET  EMPTY? 
and  POWER  SWITCH  ON?  may  both  be  answered  YES  with  no  ill 
effects.  The  important  point  to  remember  is  to  not  remove 
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the  EPROM  until  the  second  to  last  statement  on  the  CRT  is 
REMOVE  EPROM  NOW — THEN  TURN  POWER  OFF . 
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V.  PROGRAMMER  HARDWARE  AND  OPERATION 


The  design  for  the  hardware  portion  of  the  8748  EPROM 
programmer  was  based  on  the  requirements  set  forth  in  Ref.  1. 
Reference  7  provided  additional  assistance  in  switching  cir¬ 
cuit  techniques  and  methodology.  Figures  7  and  8  show  the 
schematic  for  the  final  programmer  design.  Figure  9  shows 
component  arrangement  on  the  circuit  board. 

In  first  examining  the  possibilities  for  interfacing 
the  TRS-80  with  an  EPROM  programmer,  the  question  of  output 
procedure  arose.  The  TRS-80  is  able  to  provide  an  output 
via  either  memory  mapped  or  port  selection  modes.  Since 
the  memory  mapped  system  requires  memory  addresses  to  be 
used  for  output  and  input,  this  method  had  to  be  rejected. 
With  all  possible  64k  of  addresses  already  in  use  for  either 
RAM  or  ROM,  much  confusion  could  result.  The  port  based 
system  allows  only  255  possible  ports,  but  this  is  more 
than  sufficient  if  much  of  the  work  is  done  by  the  TRS-80 
software  rather  than  programmer  hardware.  In  fact,  for  this 
8748  programmer  only  4  ports  are  needed.  In  the  port  sys¬ 
tem  the  commands  used  are  OUT  (port) ,  (value)  and  INP  (port) 
in  the  BASIC  language.  The  OUT  command  sets  the  OUT  line 
low,  simultaneously  putting  the  port  number  on  the  lower 
eight  address  lines  and  the  desired  value  on  the  eight  data 
lines  (data  bus) .  Likewise,  the  INP  command  sets  the  IN 
line  low  while  outputting  the  port  number  on  the  lower  eight 
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♦  25.4V 


Figure  7  -  Programmer  Schematic 


Figure  8  -  Programmer  Schematic 


Figure  9  -  Programmer  Circuit  Board 


address  lines.  The  data  present  on  the  data  bus  is  then 
read  into  the  TRS-80. 

The  first  major  obstacle  to  overcome  in  preparing  the 
design  of  the  programmer  was  to  verify  the  correct  pinout 
from  the  TRS-80  I/O  port. 

Since  Ref.  8  has  no  data  on  the  TRS-80  expansion  inter¬ 
face  it  was  largely  up  to  the  author  to  verify  the  pinout. 

In  connecting  up  to  the  I/O  port  a  flat  cable  40  pin  connect¬ 
or  left  over  from  another  TRS-80  application  was  used.  After 
some  time  was  spent  searching  for  signals  out  of  this  cable 
it  was  discovered  that  the  cable  and  connectors  are  wired 
to  reverse  the  signal  from  top  to  bottom.  That  is,  the  top 
,  row  of  signals  in  one  end  of  the  flat  cable  comes  out  on  the 
bottom  row  at  the  other  end  and  vice  versa.  The  similar 
cable  coming  from  the  computer /keyboard  to  the  expansion 
interface  of  the  TRS-80  also  reverses  the  signals  top  to 
bottom.  The  interface  board  is  wired  to  again  reverse  the 
signals  so  they  are  upright  coming  out  of  the  interface  I/O 
port.  Figure  10  shows  the  pinout  of  the  expansion  interface 
port. 

Once  the  proper  pinout  had  been  verified,  the  design 
and  construction  of  the  programmer  board  could  begin.  Be¬ 
cause  of  their  ready  availability,  it  was  decided  to  build 
the  system  on  a  4  x  6  Vector  plugboard  with  a  44  pin  connect¬ 
or  and  which  was  predrilled  for  wirewrap  sockets.  This 
board  provided  for  a  compact  unit  easy  to  interface  via  44 
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1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 
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21 
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23 

24 

26 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

RAS* 

SYSRES* 

CAS* 
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A12 

A13 

A15 
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All 

A14 

A8 

OUT* 

WR* 

INTAK* 

RD* 

MUX 

A9 

D4 

IN* 

D7 

INT* 

01 

TEST* 

D6 

A# 

D3 

A1 

D6 

GND 

D9 

A4 

D2 

WAIT* 

A3 

A5 

A7 

OND 

A6 

Row  Addreaa  Strobe  Output  for  16 -Pin  Dynamic  Rama 
Syatam  Raaat  Output,  Low  During  Power  Up  Initialize  or 

Reeet  Depraaaad 

Column  Addreaa  Strobe  Output  for  16-Pin  Dynamic  Rama 
Addraae  Output 

Addreee  Output 

Addraae  Output 

Addreee  Output 

Signal  Ground 

Aadreaa  Output 

Addraae  Output 

Addraae  Output 

Peripheral  Write  Strobe  Output 

Memory  Write  Strobe  Output 

Interrupt  Acknowledge  Output 

Memory  Read  Strobe  Output 

Multiplexor  Control  Output  for  16-Pin  Dynamic  Rama 
Addreaa  Output 

Bidirectional  Data  Bua 

Peripheral  Read  Strobe  Output 

Bidirectional  Data  Bua 

Interrupt  Input  (Maakable) 

Bidirectional  Data  Bua 

A  Logic  “f '  on  TEST*  Input  Tri-Statae  A9-A16,  D9-D7, 
WR*.  RD*.  IN*.  OUT*.  RAS*.  CAS*.  MUX* 

Bidirectional  Data  Bua 

Addraae  Output 

Bidirectional  Data  Bua 

Addreaa  Output 

Bidirectional  Data  Bua 

Signal  Ground 

Bidirectional  Data  Bua 

Addreaa  Bua 

Bidirectional  Data  Bua 

Procaecor  Wait  Input,  to  Allow  for  Slow  Memory 

Addreaa  Output 

Addreaa  Output 

Addreaa  Output 

Signal  Ground 

Addreaa  Output 

asafoSsr* 

NOT 

E:  *mtan*  Nefithre  (Logical ‘T)  True  Input  or  Output 

1  3 

11  13  15  17  19  21  33  25  37  29  31  33  35  37  39 

3  4 

•  •  to 
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Figure  10  -  Pinout  of  Expansion  Interface 
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pin  sockets.  The  use  of  wirewrap  techniques  on  the  board 
enabled  the  system  to  be  put  together  rapidly  and  yet  to 
provide  a  high  degree  of  reliability. 

Intel  8212  I/O  port  chips  were  selected  for  the  program¬ 
mer  unit  because  of  their  versatility  and  compactness.  These 
8  bit  ports  can  be  wired  to  operate  in  a  number  of  different 
ways  since  they  include  both  tri-state  buffers  on  the  output 
lines  and  latches  on  the  input  lines.  An  Intel  schematic 
for  the  8212  chip  is  provided  in  Figure  11. 

The  next  major  design  hurdle  for  the  programmer  hardware 
was  the  higher  voltage  switching  circuits.  This  circuitry 
can  be  seen  in  programmer  schematic  diagram.  Figure  7.  While 
several  of  the  drive  signals  to  the  8748  chip  such  as  TESTO 
and  RESET  require  0  and  +5  volts  for  off  and  on,  the  program 
functions  of  EA,  VQD  and  PROG  require  23,  25,  and  23  volts 
respectively  as  the  high  input.  In  fact,  EA  and  VDD  also 
require  a  low  of  +5  volts  while  PROG  must  have  a  low  of  0 
volts  as  well  as  a  "float"  condition.  The  output  of  the  8212 
chip  is  easily  able  to  provide  a  direct  0  to  25  volt  transi¬ 
tion  with  the  assistance,  in  some  cases,  of  a  pull-up  resist¬ 
or.  Since  no  digital  chips  provide  the  range  of  0  to  25 
volts  required  for  the  program  function,  it  was  necessary 
to  construct  separate  circuitry  using  switching  transistors. 
The  design  of  all  3  of  the  25  volt  switching  circuits  was 
basically  the  same.  A  pair  of  transistors,  one  PNP  2N3906 
and  one  NPN  2N3904,  were  tied  together  at  their  collectors 
and  driven  by  a  common  voltage  into  their  bases.  In  this 
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configuration,  when  the  2N3906  PNP  transistor  has  a  ground 
level  at  its  base,  current  flows  to  ground  and  the  transist¬ 
or  is  switched  on,  allowing  +25.4  volts  at  its  collector 
output.  At  the  same  time  a  low  on  the  base  of  the  2N3904 
shuts  it  off,  thereby  directly  all  current  into  the  collector 
output  connection.  For  the  reverse  condition,  when  the  3906 
is  shut  off  and  the  3904  is  turned  on,  no  current  is  provided 
by  the  transistor  circuitry.  Instead,  in  the  case  of  VDD  and 
EA,  5  volts  is  provided  at  the  appropriate  input  pin  from 
the  +5  volt  supply.  The  emitter  of  the  3904  is  also  tied 
to  +5  volts  to  ensure  rapid  switching  from  +25.4  to  +5  volts. 
While  the  high  operating  voltage  is  set  at  25.4  volts 
(allowable  range  is  24  to  26  volts)  the  EA  high  operating 
voltage  is  23  volts  (allowable  range  is  21.5  to  24.5  volts). 
Rather  than  providing  two  different  power  supplies,  the  23 
volts  is  reached,  for  both  EA  and  PROG,  by  dropping  the 

25.4  volts  across  3  IN  753A  diodes  in  series.  With  a  V  of 

o 

.8  volts,  the  resultant  2.4  volt  drop  enables  the  desired 
voltage  to  be  achieved. 

The  switching  circuitry  for  the  PROG  input  is  necessarily 
somewhat  different  from  the  other  two  because  of  the  require¬ 
ment  for  3  states,  namely  +23  volts,  ground,  and  floating. 
This  is  achieved  by  utilizing  two  inputs  from  the  TRS-80 
rather  than  one.  One  input  controls  the  switching  of  the 
2N3904  transistor  and  another  controls  the  2N3906.  When  the 
3906  is  on  and  the  3904  is  off,  23  volts  will  be  present  at 
the  output.  When  the  3906  is  off  and  the  3904  is  also  off. 


no  current  supply  or  drain  will  exist  and  the  input  may  seek 
its  own  level  (about  4  volts  under  operating  conditions) . 
When  the  3906  is  off  and  the  3904  is  on,  the  PROG  input  will 
be  tied  to  ground. 

The  operating  sequence  of  one  complete  cycle  of  the 
system  as  a  whole  is  illustrated  below  for  one  program  pulse 
To  assist  the  reader  in  following  this  discussion,  the  8  bit 
output  of  port  4  is  listed  below.  Underneath  each  bit  of 
port  4  is  listed  the  item  controlled  by  that  bit. 
bit  8  bit  7  bit  6  bit  5  bit  4  bit  3  bit  2  bit  1 

VDD  RESET  TESTO  EA  PROG1  PROG2  N.C.  PORT  1  MD 

Before  the  8748  is  allowed  in  the  socket  of  the  program¬ 
mer,  the  hex  code  36,  binary  00100100,  is  output  to  port  4. 
This  provides  a  +5  volts  to  PROG2  and  +5  volts  to  TESTO  with 
all  other  port  outputs  equal  to  0.  The  result  is  proper 
initial  conditions  for  the  8748  to  be  inserted  in  the  socket 
i.e.  PROG  is  floating  and  TESTO  is  high.  The  next  action  is 
to  output  hex  04.  This  switches  TESTO  to  0  volts  to  begin 
the  programming  process.  The  next  step  is  to  output  20  to 
port  4  which  switches  EA  to  +23  volts.  The  high  2  bits  of 
the  desired  8748  address  are  then  output  to  port  2.  Port  1 
is  switched  to  the  latch-on  condition  next  by  outputting  a 
21  to  port  4.  The  lower  8  bits  of  the  desired  address  are 
now  passed  to  port  1.  An  81  is  next  output  to  port  4  which 
turns  RESET  off  with  a  +5  volts  and  turns  PROG  to  the  0  volt 
(ground)  condition.  This  latches  the  address  onto  the  8748 
bus.  The  data  is  then  passed  out  to  port  1  followed  by  a 
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209  to  port  4  to  raise  VQD  to  25.4  volts,  a  221  to  port  4 
to  raise  PROG  to  +23  volts,  and  a  50  msec  delay  to  allow 
the  programming  to  occur.  PROG  is  then  taken  low  by  out- 
putting  209  to  port  4.  VDQ  is  then  lowered  to  +5  volts  by 
sending  an  81  out  to  port  4.  VDQ  is  then  lowered  to  +5 
volts  by  sending  an  81  to  port  4.  An  84  is  next  put  out 
to  place  PROG  back  in  a  floating  condition  and  set  up  for 
the  verify.  The  port  1  tristate  is  also  turned  off  at  this 
time  by  the  same  step.  A  116  is  then  placed  on  the  bus  to 
port  4  to  raise  TESTO  to  +5  volts.  This  action  places  the 
data  at  the  current  8748  address  onto  the  8748  output  bus 
where  it  is  read  into  the  TRS-80  using  the  BASIC  command 
INP (3)  to  bring  it  in  via  port  3.  The  software  then  checks 
for  correct  programming  of  that  address  and  outputs  a  20  to 
port  4  to  lower  RESET  and  TESTO  to  0  volts.  The  cycle  then 
begins  again  with  the  output  of  the  high  address  and  con¬ 
tinues  until  the  programmer's  last  desired  address  is  reached. 

The  RPROM  routine  is  basically  similar  to  the  above  ex¬ 
cept  that  no  VDD  or  PROG  pulses  are  used  and  no  data  is  out¬ 
put  to  the  8748.  Instead,  the  addresses  are  put  out  to  the 
chip  and  the  verify  procedure  follows  immediately.  A  pic¬ 
ture  of  the  actual  timing  diagram  for  this  process  is  avail¬ 
able  as  Figure  12.  These  waveforms  correspond  favorably 
with  the  required  traces  as  seen  on  page  6-8  of  Ref.  1. 
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VI.  PROGRAMMER  POWER  SUPPLIES 


The  power  for  the  8748  programmer  is  drawn  from  two 
separate  power  supplies  contained  within  the  programmer 
enclosure.  These  supplies  are  not  shared  with  the  TRS-80 
power  supplies.  The  right  hand  circuit  board  within  the  en¬ 
closure  was  a  pre-built  supply  available  from  another  stu¬ 
dent's  project.  It  is  powered  by  a  26  volt  transformer  and 
produces  3  separate  DC  voltages  using  on-board  rectifiers 
and  LM  723  voltage  regulators.  The  DC  levels  available  from 
this  supply  are  +5,  +12,  and  -12  volts.  Variable  resistors 
are  available  for  each  supply  to  allow  adjusting  of  output 
voltages  by  approximately  +1  volt.  In  this  application  only 
the  +5  volts  is  required  and  it  is  hard  wired  to  the  mother 
board.  The  +12  and  -12  supplies  are  available  for  future 
student  projects.  In  fact,  if  a  2708  programmer  is  con¬ 
structed,  the  +12  volt  and  a  -5  volt  supply  drawn  from  the 
-12  volts  will  be  required. 

The  other  power  supply  board  in  the  programmer  enclosure 
provides  a  regulated  25.4  volts  DC  for  the  EPROM  programming 
pulses.  This  supply  was  constructed  by  the  author.  Figure 
13  is  a  schematic  diagram  of  the  unit  which  uses  an  LM-317 
for  voltage  regulation. 

Current  requirements  for  the  8748  programmer  are  fairly 
significant  for  the  +5  volt  supply.  In  excess  of  500  milli- 
amps  is  required  to  power  the  board.  Much  of  this  current  is 


53 


Figure  13  —  25.^  /olt  Power  Supply 


taken  up  by  the  8212  I/O  port  chips  which  operate  at  a  higher 
than  ambient  temperature.  The  25.4  volt  supply  current  re¬ 
quirement  is  less  than  40  milliamps  and  then  only  during 
actual  programming. 

A  schematic  is  not  provided  of  the  mother  board  since  it 
is  simply  an  extension  from  the  TRS-80  expansion  interface 
output  port.  It  should  be  noted,  however,  that  the  printed 
circuit  lines  on  the  top  of  the  mother  board  and  on  the  right 
side  of  the  44  pin  sockets  represent  the  bottom  row  of  output 
pins  from  the  expansion  interface.  Likewise,  the  top  row 
outputs  from  the  interface  are  on  the  bottom  of  the  printed 
circuit  board  and  the  left  side  of  the  sockets.  The  4  out¬ 
side  lines  on  the  mother  board  are  not  connected  to  the  TRS-80 
40  pin  connector  and  are  intended  for  use  in  supplying  power 
from  the  programmer  power  supplies.  Additionally,  it  should 
be  noted  that  all  lines  from  the  TRS-80  are  connected  to  only 
the  first  44  pin  socket.  The  left  most  3  sockets  have  only 
the  data  lines,  lower  8  address  lines,  ground,  OUT  and  IN. 

The  reason  for  this  is  that  these  signals  are  the  only  ones 
required  to  provide  port  mode  input  and  output.  Thus,  they 
will  suffice  for  most  applications. 

To  provide  maximum  protection  for  the  programmer  cir¬ 
cuitry,  3  fuses  have  been  installed.  A  120  volt,  2  amp  fuse 
is  located  in  the  input  power  line  to  protect  against  major 
transformer  failure.  A  750  milliamp  fuse  is  inserted  in  the 
5  volt  supply  line  and  a  3/8  amp  fuse  is  in  the  25  volt 
programming  supply  line  to  protect  the  programmer  board 
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against  major  damage  in  the  event  of  overload. 

The  light  on  the  front  panel  of  the  programmer  assembly 
indicates  that  120  volts  have  been  received  past  the  120 
volt  fuse.  The  fuses  for  the  5  and  25  volt  supplies  must  be 
checked  visually  if  the  programmer  is  not  operating  correctly. 
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VII.  CONCLUSION 


The  microprocessor  development  system  discussed  in  this 
thesis  is  already  in  use  by  several  groups  of  students  who 
are  employing  the  8748  chip  in  various  applications.  These 
users  have  been  favorably  impressed  with  the  effectiveness 
and  simplicity  of  the  system,  especially  when  compared  with 
the  Tektronix  8002  MDS .  While  the  8002  has  many  more  capa¬ 
bilities,  its  sophistication  is  at  such  a  high  level  that 
the  beginning  student  in  microprocessors  must  spend  many 
hours  learning  how  to  use  it.  The  typical  requirements  for 
an  MDS,  to  edit,  assemble  and  program  EPROMs,  are  more  than 
met  by  the  author's  system. 

Perhaps  an  even  more  significant  difference  between  the 
TRS-80  based  system  and  the  more  sophisticated  systems  is 
cost.  The  TRS-80  in  its  present  configuration  is  available 
for  about  $2000,  while  the  Tektronix  system  costs  over 
$15,000.  In  fact,  the  8748  assembler  module  alone  for  the 
8002  is  worth  $850  with  the  complete  emulator  card  and  probe 
raising  that  price  to  over  $4,000. 

In  constructing  the  programmer  assembly  for  the  8748, 
additional  sockets  were  provided  in  a  4  socket  mother  board. 
These  sockets  accept  the  standard  44  pin  Vector  plugboard. 

It  is  recommended  that  future  student  projects  and  thesis 
work  be  directed  toward  the  construction  of  software  and 
hardware  to  expand  this  MDS.  Some  additions  which  might 
prove  useful  to  8748  users  would  be  an  in-circuit-emulator 


and  a  debugger  to  allow  for  real  time  execution  of  the 
user's  program  in  TRS-80  software.  Other  possible  projects 
could  be  a  programmer  for  the  Intel  2708  and  2716  or  other 
commonly  used  EPROMs.  With  little  additional  effort  a 
parallel  to  the  already  installed  capabilities  for  the  8748 
could  be  included  to  provide  for  the  8080,  Z-80,  6800,  and 
other  popular  microprocessors.  Since  the  editor  program  would 
work  for  any  microprocessor  language,  the  task  of  program 
building  would  be  limited  to  only  the  assembler  program. 

Thus,  a  new  capability  for  the  TRS-80  MDS  would  consist  of 
only  a  $5  magnetic  disk  to  store  the  programs. 

Other  capabilities  could  be  added  to  the  digital  labora¬ 
tory  by  interfacing  the  TRS-80  to  the  Tektronix  8002  to  allow 
for  exchanging  programs  and  data  between  the  two.  Addition¬ 
ally,  the  TRS-80  might  be  used  as  a  real  time  processor  for 
the  IBM-360  or  other  main  frame  computer,  allowing  for  the 
transfer  of  programs  and  data  between  several  computers. 

With  the  advent  of  smaller,  faster,  and  more  capable 
microprocessors,  the  age  of  truly  distributed  processing 
systems  is  upon  us.  Additionally,  microprocessor  systems  of 
the  future  will  be  the  equivalent  in  capability  of  main 
frame  computers  of  the  past.  For  these  reasons  the  import¬ 
ance  of  understanding  the  capabilities  and  limitations  of 
microprocessors  and  microcomputers  cannot  be  over  emphasized. 
The  microprocessor  development  system  is  one  necessary  and 
concrete  step  toward  this  goal.  To  be  able  to  rapidly  and 


effectively  program  and  utilize  the  microprocessor  is  the 
raison  d'etre  of  the  microprocessor  development  system  and 
is,  not  coincidentally,  the  path  of  the  future. 
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PROGRAM  LISTING  FOR  PRINTER  SUBROUTINE 


Location 

Hex  Code 

Label 

Opcode 

Operand 

FFOO 

E5 

INIT 

PUSH 

HL 

FF01 

C5 

PUSH 

BC 

FF02 

F5 

PUSH 

AF 

FF03 

3A48FF 

LD 

A, (FLAG) 

FF06 

FE01 

CP 

01H 

FF08 

2820 

JR 

Z , RESTOR 

FFOA 

3E01 

LD 

A,  01H 

FFOC 

3248FF 

LD 

(FLAG) ,  A 

FFOF 

D3E8 

OUT 

E8 ,  A 

FF11 

DBE9 

IN 

AE9 

FF13 

E6F8 

AND 

0F8H 

FF15 

F604 

OR 

04H 

FF17 

3247FF 

LD 

(SWTIMG) , A 

FF1A 

D3EA 

OUT 

EA,  A 

FF1C 

DBE9 

BAUDST 

IN 

A,  E9 

FF1E 

E607 

AND 

07H 

FF20 

213FFF 

LD 

HL, BDTABL 

FF23 

0600 

LD 

B ,  00H 

FF25 

4F 

LD 

C ,  A 

FF26 

09 

ADD 

HL,BC 

FF27 

7E 

LD 

A, (HL) 

FF28 

D3E9 

OUT 

E9 ,  A 

FF2A 

FI 

RESTOR 

POP 

AF 

FF2B 

Cl 

POP 

BC 

FF2C 

El 

POP 

HL 

FF2D 

DBEA 

STATIN 

IN 

A,  EA 

FF2F 

CB77 

BIT 

6, A 

FF31 

28FA 

JR 

Z, STATIN 

FF33 

79 

LD 

A,C 

FF34 

D3EB 

OUT 

EB,A 

FF36 

FEOD 

CP 

0DH 

FF38 

2004 

JR 

NZ, RETRN 

FF3A 

C350FF 

JMP 

FF50 

FF3D 

00 

NOP 

FF3E 

C9 

RETRN 

RET 

FF3F 

22 

BDTABL 

DEFB 

22H 

FF40 

44 

DEFB 

44H 

FF41 

55 

DEFB 

55H 

FF42 

66 

DEFB 

66H 

FF43 

77 

DEFB 

77H 

FF44 

AA 

DEFB 

0AAH 

FF45 

CC 

DEFB 

0CCH 

FF46 

EE 

DEFB 

0EEH 

FF47 

00 

SWT IMG 

DEFB 

00H 

FF48 

00 

FLAG 

DEFB 

00H 

FF49 

00 

NOP 

FP50 

00 

NOP 

FF51 

00 

NOP 

FF52 

00 

NOP 

FF53 

00 

NOP 

FF54 

00 

NOP 

FF55 

00 

NOP 

FF56 

00 

NOP 

FF57 

E5 

PUSH 

HL 

FF58 

21FF44 

LD 

HL,  44 

FF  5  A 

2B 

DEC 

HL 

FF5B 

7C 

LD 

A,H 

FF5C 

B5 

OR 

L 

FF5D 

C254FF 

JP 

NZ  f  FF54 

FF60 

El 

POP 

HL 

FF61 

OEOA 

LD 

C ,  OAH 

FF63 

C32DFF 

JP 

FF2D 

61 


APPENDIX  B 


FLOWCHART  FOR  EDITOR  PROGRAM 


SAVE  ALL  LINES 
IN  MEMORY  ON 
DISK 


PRINT  "INPUT 


STORE  AND 
ADVANCE  TO 
NEXT  LINE  NUMBER 


APPENDIX  C 


FLOW  CHART  FOR  ASSEMBLY  PROGRAM 


66 


PRINT  "FIRST 
PASS  COMPLETED" 
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APPENDIX  D 


FLOWCHART  FOR  "PROGRAM"  PROGRAM 


A 


CALL  SETUP 
SUBROUTINE . 


OUTPUT  FIRST 
LINE  OF  CODE 
TO  DESIRED 
ADDRESS 


READ  CODE  AT 
SAME  ADDRESS 
IN 


CODE  OUT 
=CODE  IN? 


PRINT  "PROGRAMMING 

V  NO 

ERROR-ERASE 

>  » 

EPROM  AND  TRY 

AGAIN 

LAST  ^ 
LINE  IN? 


:oj 


m 


CALL  SETUP 
SUBROUTINE 


READ  EPROM 
FIRST  DESIRED 
LINE 


DESIRED  LINE 
V  READ?  / 


READ  NEXT 
LINE 


RESTORE 
PROGRAMMER  TO 
INITIAL 
CONDITIONS 


CONVERT  DECI 
NUMBERS  TO 
HEX 


PRINT  HEX  CODE 
IN  BLOCK  FORM 


PRINT  "REMO\ 
EPROM  NOW- 
THEN  TURN 
POWER  OFF" 
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8748  EDITOR/ASSEMBLER  OPERATING  INSTRUCTIONS 


This  development  system  operates  under  its  own  set  of 
instructions  and  commands  and  no  knowledge  of  the  TRS-80 
operating  system  or  the  BASIC  language  is  presumed  or  neces¬ 
sary. 


To  load  the  8748  program  proceed  as  follows: 

1.  Turn  on  the  master  power  switch  on  the  bus  strip. 

2.  Turn  the  CRT  on  by  pushing  in  the  button  in  the  upper  right 
hand  corner. 

3.  Turn  the  expansion  interface  on  by  pressing  in  on  the 
button  in  the  center  front  face  of  the  unit. 

4.  Turn  the  disk  drive  on  by  placing  the  toggle  switch  on 
the  rear  of  the  drive  unit  up. 

5.  Insert  the  8748  disk  in  the  drive  with  the  notch  up  and 
the  label  facing  to  the  right.  Close  the  disk  drive 
door . 

6.  Turn  the  TRS-80  on  by  pressing  in  on  the  button  located 
on  the  rear  of  the  keyboard  just  to  the  left  of  the  3 
input  cables. 

7.  The  system  will  now  load  the  dirk  operating  system  fol¬ 
lowed  by  the  BASIC  system.  The  screen  will  display  the 
following: 


HOW  MANY  FILES? 

Answer  this  by  typing  a  1  and  pressing  ENTER. 

The  next  question  on  the  screen  will  read 

MEMORY  SIZE? 

Answer  this  with  65000  and  ENTER. 

The  system  will  then  respond  with 

RADIO  SHACK  DISK  BASIC  VERSION  2.2 
READY 
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Now  type  in  RUN  "EDTASM"  and  press  ENTER. 

This  loads  the  8748  editor/assembler  and  the  screen  will 
display 

8748  EDITOR  ASSEMBLER  ON  LINE 
ENTER  MODE  SELECTION — 

The  operator  is  now  ready  to  begin  entering  and  editing 
his  8748  assembly  level  language  program.  The  following  com¬ 
mands  and  modes  provide  all  the  assistance  necessary  to  pro¬ 
vide  a  fully  assembled  version  of  his  program. 


Modes  available: 

INPUT 

To  enter  program  lines  into  system 
buffer. 

PRINT 

Prints  contents  of  buffer  on  video 
display. 

LPT1 

Prints  contents  of  buffer  at  the  line 
printer. 

EDIT 

Provides  for  editing  of  lines  in  buffer 
(See  EDIT  commands.) 

GET  (filename) 

Transfers  (filename)  program  from  disk 
storage  into  buffer. 

ASM  (filename) 

Assembles  program  named  (filename)  and 
provides  complete  printout  at  the  line 
printer.  (ensure  that  printer  is  con¬ 
nected  to  TRS-80  and  turned  on.) 

Edit  Commands: 


UP 

DN 

TOF 


Moves  pointer  up  one  line  in  the  buffer 

Moves  pointer  down  one  line  in  the 
buffer. 

Moves  pointer  to  the  top  line  in  the 
buffer. 
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EOF 


Moves  the  pointer  to  the  end  of  the 
file  in  buffer. 


DEL 


Deletes  the  current  line. 


INS 


L  /xxx/ 


C  / xxx/yyy/ 


Provides  for  a  new  line  to  be  inserted 
above  the  current  line. 

Locates  the  first  line  containing 
substring  xxx  and  moves  the  pointer 
to  that  line. 

Changes  substring  xxx  to  yyy  in  the 
current  line. 


FILE  (filename) 
PRINT 

INPUT 


Transfers  the  contents  of  buffer  to 
disk  storage  under  name  (filename) . 

Prints  contents  of  the  buffer  on  the 
video  display. 

Puts  the  system  in  the  input  mode. 


Input  operations: 

Enter  new  program  lines  in  the  following  format: 


Label 


Left  justified,  1  to  6  alphanumeric 
characters  ending  with  a  colon. 

(Leave  blank  if  no  label  is  desired.) 


Tab  to  8  by  pressing  -*■  key. 


Opcode 


3  or  4  letter  code  from  MCS-48  user's 
manual . 


Tab  to  16. 


Operand  Alphanumerics  as  given  in  MCS-48 

user's  manual.  Numbers  must  be  in 
decimal. 

Locations  must  be  a  1  to  6  digit  label 
only . 

Tab  to  24. 


Comments 


If  desired,  type  a  semicolon  followed 
by  a  short  description  of  instruction 
operation. 
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In  general 

Press  ENTER  to  move  to  the  next  line. 

After  the  last  program  line  type  END  as  an  opcode. 

The  opcode  ORIG  may  be  used  in  the  first  line  with  a 
decimal  number  as  the  operand  to  direct  the 
assembler  to  place  the  beginning  of  the  program 
at  that  address. 


Resets  the  line  pointer  to  zero  and 
returns  to  the  executive  routine. 

Transfers  files  from  the  buffer  to 
disk  storage  and  returns  to  the  execu¬ 
tive  routine. 

Transfers  to  the  edit  mode  to  allow 
for  program  changes  and  corrections . 

Errors 

There  are  a  number  of  unlikely  but  possible  errors  which 
can  be  made  which  would  result  in  the  system's  dropping  out 
of  program  RUN  and  back  to  the  BASIC  mode.  If  this  occurs, 
in  every  case  the  word  READY  will  appear  as  the  last  word 
on  the  CRT.  To  return  to  that  portion  of  the  program  which 
was  in  operation,  simply  type  RUN  and  press  ENTER.  Un¬ 
fortunately  all  files  in  the  system  buffer  will  be  lost  and 
must  be  reentered.  For  this  reason  it  is  wise  to  periodically 
save  portions  of  the  new  program  as  they  are  being  written. 
This  is  done  by  the  command  FILE  (filename) .  To  continue 
building  on  this  program  go  to  INPUT  and  continue  writing. 
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Linking 

Programs  can  be  written  by  different  authors  or  the  same 
author  with  the  eventual  aim  of  combining  into  one  large 
program  for  later  assembly  and  execution.  To  combine  two 
programs  they  must  first  be  written  and  FILEd  on  the  disk. 
Press  the  BREAK  key  and  wait  for  the  READY  signal.  Then 
type  APPEND  (filename  1)  TO  (filename  2) ,  after  which  type 
KILL  "(filename  1)".  To  return  to  the  executive  again  for 
assembly  type  RUN.  It  will  now  be  necessary  to  edit  the 
new  program  by  deleting  the  END  and  EOF  from  the  end  of 
the  first  subprogram. 

Programming 

Once  the  assembly  of  the  user's  8748  program  is  completed 
with  no  errors  detected,  the  programmer  program  will  be  auto¬ 
matically  loaded.  The  following  program  modes  are  available: 

STOP  Exits  the  program  to  BASIC  mode. 

EDIT  Returns  system  to  editor/assembler . 

RPROM  Used  to  read  an  8748  EPROM. 

WPROM  (filenameO)  Writes  a  program  entitled  (file¬ 
name  +0)  to  an  8748  EPROM.  (0, 
for  object  code,  must  be  appended 
to  the  original  filename.) 

Full  questions  and  commands  are  provided  by  the  program 
to  prompt  the  user  during  the  RPROM  and  WPROM  modes. 


Ensure  that  the  8748  chip  is  not  inserted  or  removed 
from  the  socket  except  when  so  directed  by  the  program. 


Great  caution  must  also  be  exercised  to  make  certain  the 
chip  is  not  inserted  incorrectly  as  this  could  result  in 
severe  damage  to  the  8748. 

Turn  off  sequence.  (Can  be  followed  any  time  except  when 
disk  drive  light  is  on  or  programmer  has  8748  in  the 
socket . ) 

1.  Remove  diskette  from  disk  drive. 

2.  Turn  off  disk  drive. 

3.  Turn  off  programmer. 

4.  Turn  off  keyboard/computer. 

5.  Turn  off  CRT  and  interface. 

6.  Turn  off  master  power  switch  on  power  bus. 

NOTE:  The  power  transformers  (2)  in  the  interface  unit 

are  not  affected  by  any  power  switches  on  the  TRS-80  com¬ 
ponents.  For  this  reason  the  master  power  to  the  plugs 
must  be  turned  off  or  the  transformers  will  continue  to 
operate . 


- r  —  -  -- 
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APPENDIX  F 


Printer  Program  -  "EDTASM" 


1  '  THIS  PHOG  POTS  THE  SERIAL  PRINTER  DRIVER 

INTO  MEM  LOCATIONS  FF00  -  PE5F 

2  '  DCB:  +0  =>  ECR  TYPE  PRINTER  STARTS  0  4025 

1  =>  DRIVER  AIDR  LSE 

2  =>  DRIVER  AEIR  MSB 

3  =>  LINES/PAGS 

4  =>  LINE  COUNTER 

3  POKE  16421, 2:P0KE  16422, 0:POKE  16423,255 

4  FOR  I  =  0  TO  £5 

5  X=-256  +1 

6  READ  Y 

7  POKE  X , Y 

8  NEXT  I 

9  RUN”MASTER" 

10  END 

11  DATA  22S , 1S7 ,245 ,56 ,72 ,255 ,254 , 1 , 40 

12  DATA  32,62,1,50,72,255,211,232,213,233 
•13  DATA  230,248.246,4,50,71,255,211,234 

14  DATA  219,233,230,7,33,63,255,6,0,75,3 

15  DATA  126,211,233,241,193,225,219,234 

16  DATA  203,119,40,250,121,211,235,254 

17  DATA  13,32,4,195,80,255,00,201,34,63 

18  DATA  85,102,119,170,204,238,0,0 

19  DATA  0,0,0,0,0,0,0,229,33,255,68,43 

20  DATA  124,181,194,84,255,225,14,10,195,45,255 
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Editor  Program  -  "MASTER" 


1  '♦♦♦♦"MASTER"**** 

2  '  - EXECUTIVE  ROUTINE - 

3  CLEAR  10000 

4  DEFINT  E-Q 

5  IEFSTR  W ,X , Y  ,  Z 

6  EIM  X (1000  ) , W (1000  ) 

?  CLS 

8  PRINT  TAB ( 15  )  8748  El ITOP./ASS EMBLER  ON  LINE 

9  PRINT”" 

10  J=0  . 

11  Y  =  "GO  ’ 

12  LINE  INPUT  "ENTER  MOIE  SELECTION—  5Y 

13  IF  Y  =  ’’LPTl"  GOTO  67 

14  IF  Y="INPUT"  GOTO  53 

15  IF  Y  =  *'ELIT"  GOTO  27 

16  IF  LEFT$( Y , 3 )="GET”  GOTO  83 

17  IF  YO’PRINT  *  GOTO  IS 

18  GOSUB  119  :GOTO  11, 

13  IF  LEFT$(Y,3)<>  ASM  GOTO  24 

20  Z=MIE$ ( Y , 5 . 1C) 

21  OPEN  "O  '  ,  1 »  ’STORE" 

22  PRI NT#1  ,Z :  CLOSE 

23  RUN"ASSEMELE 

24  PRINT  "ILLEGAL  ENTRY-TRY  AGAIN" 

25  GOTO  11 

26  '  - EDIT  ROUTINE - 

27  PRINT  "ELIT” 

28  M=I 

29  PRINT  X (M ) 

30  LINE  INPUT  ""jZ 

31  IF  Z<>"UP"  GOTO  34 

32  IF  M=0  GOTO  29 

33  M-M-l:  GOTO  29 

34  IF  ZO"EN"  GOTO  36 

35  M=M+1 :  GOTO  29 

36  IF  Z="EEL"  GOTO  113 

37  IF  Z="lNS "  GOTO  ie4 

38  IF  LEFT$(Z,4)="FILE"  GOTO  72 

39  IF  Z<>" INPUT"  GOTO  41 

40  J=J+1 :GOTO  53 

41  IF  Z-  ’EEIT  GOTO  30 

42  IF  ZO’  PRINT"  GOTO  44 

43  GOSUB  119  :G0T0„27 

44  IF  LEFT$(Z ,1 )=  L  GOTO  91 

45  IF  LEFT$(Z,1)*"C  '  GOTO  128 

46  IF  ZO"TOF  GOTO  48 
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47  M=0:  GOTO  2S 

48  I?  ZO"EOF"  GOTO  50 

49  M=J :  GOTO  29 

50  PRINT  "ILLEGAL  ENTRY-TRY  AGAIN" 

51  GOTO  29 

52  '  - INPUT  ROUTINE - 

53  PRINT  "INPUT" 

54  FOR  I=J  TO  1000 

55  LINE  INPUT  "";X(I) 

56  IF  X(I  )  =  "OUIT  ‘  GOTO  10 

57  IF  X(I )<>’ EIIT”  GOTO  59 

58  X(I)="EOF"  :  GOTO  27 

59  IF  LEFT$ { X( I ) , 4 ) <>”FILE"  GOTO  £2 

60  Y=MID$ (X (I ) , 6, 10 ) :  J=I 

61  X(I)=  EOF" :GOTO  76 

62  J=I 

63  NEXT  I 

64  PRINT  "YOU  HAVE  USEE  ALL  8748  MEMORY" 

65  ENE 

66  ' - LPT1  ROUTINE - 

67  FOR  0=0  TO  J 

68  LPRINT  X(0) 

69  NEXT  0 

70  GOTO  11 

71  ' - FILE  ROUTINE - 

72  Y=MI E$ ( Z , 6 , 10 ) 

73  IF  LEN(Y )<>0  GOTO  76 

74  PRINT  'FILENAME  REQUIREE l " 

75  GOTO  27 

76  0PEN"0",1,Y 

77  PRINT#1,J 

78  FOR  K=0  TO  J 

79  PRINT#1,X(5) 

80  NEXT  5:  CLOSE 

81  GOTO  11 

82  ' - GET  ROUTINE - 

83  Z=MIB$(Y ,5,10) 

84  0PEN"I  ,1,Z 

85  INPUT#1 , J 

e6  FOR  5=0  TO  J 
87  LINE  INPUT#1 ,X(  5 ) 
e8  NEXT  5:  CLOSE 

89  GOTO  11 

90  ' - LOCATE  ROUTINE - 

91  FOR  5=4  TO  16  .  .. 

92  IF  MID$(Z, E,l)<>  7  GOTO  100 

93  N-I-4 

94  IL*MIE$ (Z ,4 , N ) 

95  FOB  M=0  TO  J 

9€  1=INSTR(X(M) ,XL) 

#7  If  LO0  GOTO  29 

99  NEXT  M 

99  FI I NT "STRING  NOT  LOCATED":  GOTO  29 

\m  NXXT  K 
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101  print**right  hast  delineator  not  found" 

102  GOTO  29 

1^3  '  - INSERT  ROUTINE - 

104  FOR  L=H  TO  J+l 

105  W(K)="0" 

106  W(L+1)*X(L) 

107  X  ( L )  3V  ( L ) 

108  NEXT 

109  J=J+1 

110  LINE  INPUT  ”*‘;X(M) 

111  GOTO  29 

112  '  - DELETE  ROUTINE - 

113  FOR  L=K  TO  J 

114  X( L )3X( L+l ) 

115  NEXT  L 

116  J=J-1 

117  GOTO  29 

118  '  - PRINT  ROUTINE - 

1 19  FOR  X=0  TO  J 

120  PRINT  7 (K) 

121  NEXT  X 

122  RETURN 

VNT 

124  '  - TOF  ROUTINE - 

125  M=0 

126  GOTO  29 

127  ' - CHANGE  ROUTINE - 

128  FOR  X=4  TO  16 

129  IF  MIE$(Z,X, 1)0*7"  GOTO  146 

130  N=I-4 

131  X0=MIE$(Z,4,N ) 

132  P--R+1 

133  FOR  0=P  TO  35 

134  IF  MIE$ ( Z  ,0 , 1  )<>"/*’  GOTO  145 

135  Q=0-P 

136  L=INSTR(X (K ) ,X0  ) 

137  IF  L30  GOTO  151 

138  H2=L+N 

139  L=L-1 

140  X1-MIE$(X(M),1,L) 

141  X2=MID$(Z,P,Q) 

142  X3=MIE$(X(M)fH2f50) 

143  X (M )=X1+X2+X3 

144  GOTO  29 

145  NEXT  g 

146  PRINT”LAST  EELINEATOR  NOT  FOUNE’* 

147  GOTO  29 

148  NEXT  X 

149  PRINT  ”SECONE  EELINEATOR  NOT  FOUNE** 

150  GOTO  29 

151  PRINT”0LE  STRING  NOT  FOUND** 

152  GOTO  29 
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Assembler  Program  -  "ASSEMBLE" 


1 

2  ' - ASSEMBLY  ROUTINE - 

3  CLEAR  10000 

4  EEFINT  H-P 

5  EEFSTR  A  ,U,V,W,X,Y,Z ,T 

6  DIM  D( 100) ,HX$( 100) ,X(100) 

7  DIM  U(l00).V(100),Y(l£0) , Z ( 100 ) 

8  OPEN"r,l,  STORE" 

9  INPUT#1*Y  :  CLOSE 

10  CPEN"I  ,1,Y 

11  I NPUT#1 ,  J 

12  FOR  1=0  TO  J-l 

13  LINE  INPUT#1,X(I) 

14  IF  INSTR(X(I),’  :  )=0  SOTO  17 

15  E=INSTR (X( I ) ,":") 

16  V(I)-MIE$(X(I),1,(B-1)) 

17  NEXT  IrCLOSE 

18  IF  I NSTR( 8 , X (0 ) , ”CRIG" ) =0  GOTO  20 

19  W(0)=MIE$(X(0) ,17.4) :E(0)*VAL(¥(0))-1 

20  FOR  K=0  TO  J-l 

21  T=X ( K) : IF  INSTR (T , " » " )=0  GOTO  23 

22  H=INSTR(T , " » ’ ) :T=MI E$ (T , 1 , H ) 

23  IF  INSTR(8,T ,  J')<>0  GOTO  91 

24  IF  INSTR(8,T,"#")<>0  GOTO  SI 

25  IF  I NSTR(8 ,T , "CALL" ) <>0  GOTO  91 

26  BK=1 

27  IF  INSTR(e,T."ENE")<>0  GOTO  31 

28  E(K  +  1)»E(K)«-BK  :  E=E(X)  :  GOSUB  S3 

29  3X$(X)=A(3)+A{2)+A(l) 

30  PRINT  K+i;TAB(6)  HX$ (K ) ; TAB ( 12  )  X(X) 

31  NEXT  K 

32  PRINT"FIRST  PASS  COMPLETE!" 

33  FOR  L*0  TO  J-l 

34  T*X(L) : IF  INSTR( X(L  ) ; ”  )=0  GOTO  36 

35  H=INSTR<X(L)  ,  ,*  )  :T=MIE$(X(L)  ,  1  ,H) 

36  IF  INSTR(8,T CLR)<>0  GOTO  201 

37  IF  INSTR(6,T,"M0V  )<>0  GOTO  316 

38  IF  I NSTR(8,T ,  IN  )<>0  GOTO  253 

39  IF  INSTR(8,T,"ORL,,)<>0  GOTO  378 

40  IF  INSTR (8 ,T , "OUTL  )<>0  GOTO  405 

41  IF  INSTR(8 ,T ,"AEE  "  )<>0  GOTO  119 

42  IF  I NSTR(8, T , "RET*  )<>0  GOTO  415 

43  IF  INSTR(8,T,"  RL")<>0  GOTO  420 

44  IF  INSTR(8 ,T ,  RR  )<>0  GOTO  425 

45  IF  INSTR(8,T ,"XCH  )<>0  GOTO  446 

46  IF  INSTR(8,T,"DJNZ")<>0  GOTO  232 
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47  IF  INSTR(S,T,"JC  ”)O0  GOTO  2?S 

48  IF  INSTR(S,T,"JF")<>0  SOTO  282 
48  IF  INSTR(8,T,**JMP  ’ )  O0  GOTO  299 

50  IF  INSTR(e,T,"jfO<>0  GOTO  2S6 

51  IF  I NSTR(8 ,T CPL  *  )<>0  GOTO  210 

52  IF  IN5TR(8,T,"M0VE  )<>0  GOTO  357 

53  IF  INSTR(S,T , "MOVP” )<>0  GOTO  365 

54  IF  INSTR(8,T,”MOVX")<>0  GOTO  370 

55  IF  INSTR(8,T,"JB)<>0  GOTO  271 

56  IF  INSTR(8,T,"AEIC”)<>0  GOTO  118 

57  IF  I NSTR (8 ,T , ” JT ’ )<>0  GOTO  307 
59  IF  INSTR(8,T,"JZ  ”)<>0  GOTO  314 

59  IF  INSTR(8,T  ,’  NOP  )*0  GOTO  61 

60  Z ( L  )="00"  :GOTO  140 

61  IF  INSTR{8,T  ,’’DA  ’  )=0  GOTO  63 

62  Z(L)="57*  :  GOTO  14e 

63  IF  I  NSTR(8  ,T  ,  "DEC  ’  )O0  GOTO  213 

64  IF  INSTR£8,T ."STOP  ")=0  OR  INSTR  ( 13  ,T  ,  "TCNT"  )  =0  GOTO  S6 

65  Z  (L)  =  65  :GOTO  140 

66  IF  I NSTR ( 8, T  ,  "SWAP  ")=e  OP.  INSTR(  13  ,T  A")=0  GOTO  69 

67  Z  (L )  =  47  :GOTO  140 

68  IF  I NSTR(8 ,T , " INC*  ) <>0  GOTO  253 

69  IF  I NSTR(8 ,T , "SEL  *)<>0  GOTO  432 

70  IF  INSTR(e,T,"ANL")<>0  GOTO  149 

71  IF  INSTR(8,T,”CALL’)<>0  GOTO  183 

72  IF  I NSTR(8,T , "STRT  ")<>0  GOTO  441 

73  IF  IN§TH{8,T,"INS  ")=0  GOTO  75 

74  Z  (L  )  =  08  :  GOTO  140 

75  IF  INSTR(8,T,"EN")<>0  GOTO  244 

76  IF  INSTR(8,T , "XRL  "  )<>0  GOTO  458 

77  IF  INSTR(8,T ."CIS" )<>0  GOTO  227 

78  IF  INSTR(8,T,"ORIG”)<>0  GOTO  80 

79  GOTO  125 
8e  NEXT  L 

81  PRINT"ASSEMBLY  COKPLETEE” 

82  PRINT  ERS;”  ERRORS" 

83  IF  ERS=0  GOTO  473 

84  PRINTLINE  ERROR” 

85  FOR  1=0  TO  J 

86  IF  LEN (U( I ) )=0  GOTO  88 

87  PRINT  (I+1);TAB(9)  U(I) 

88  NEXT  I 

89  GOTO  473 
S0  ENE 

91  IF  INSTR(8,T ,’JMPP" )<>0  GOTO  26 

92  BT*2  :  GOTO  27 

93  Il=FIX ( E/16) 

94  F(1)*E-(16*I1) 

95  I2«FIX( 11/16) 

96  F(2)=U-(16*I2) 

97  I3=FIX( 12/16) 

98  F(3)«I2-(16#I3) 

99  FOR  N=1  TO  3 

100  IF  F(N)*0  THEN  A(N)*V’ 
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101  IF  F( N ) =1  THEN  A<N)=' 1. 

102  IF  F { N )=2  THEN  A(N)«"2„ 

103  IF  F(N>=3  THEN  A(N)=<t3.. 

104  IF  F{ N )=4  THEN  A<N)  =  4 

105  IF  F( N )-5  THEN  A(N>=”5" 

106  IF  F ( N )=6  THEN  A(N)-"6„ 

10?  IF  F(N )=7  THEN  A(N)  =  ? 

108  IF  F(N)=8  THEN  A(N)=”Q" 

109  IF  F(N)=9  THEN  A(N)  =  "g”f. 

110  IF  F(N)=10  THEN  A(N)  =  A 

111  IF  F(N )=11  THEN  A(N)="B„ 

112  IF  F(N)=12  THEN  A(N)  =  ..C„ 

113  IF  F(N )  =  13  THEN  A(N)=  (D  t 

114  IF  F(N)=14  THEN  A(N)=  E 

115  IF  F(N)=15  THEN  A(N)«”F” 

116  NEXT  N  :  RETURN 

117  '—FOR  "ADD"  5.  "ANL”— 

118  Q=1  :  GOTO  120 

119  Q=0  ..  .. 

120  B=INSTR(8,T,  ,  ) 

121  IF  B=0  GOTO  125  , 

122  IF  INSTR (B, T , ”  ,B  ) <>0  GOTO  133 

123  IF  INSTH(B,T,",G) <>0  GOTO  143 

124  IF  INSTH(E,T,"  ,#")<>0  GOTO  126,. 

125  EF.S=ERS  +  1  :  U(L)= 'SYNTAX  ERROR 


:  GOTO  30 


126  W=MID$(T ,(E+2) ,3) 

127  E=VAL(W) 

128  IF  E<256  GOTO  131 

129  ERS=ERS+1 

130  U(L)="EATA  EXCEEDS  EXTE  SIZE  :GOTO  §0 

131  IF  0=0  THEN  Y(L  )='*03  ELSE  Y  (L)=  19 

132  GOTO  13e 


133  W=MID$ (T , ( B+2 ) , 1 ) 

134  IF  VAL(V)<8  GOTO  137 


135  ERS=ERS+1 

136  U(L)  =  "REGISTER  SIZE  EXCEEDS  7  -.GOTO  80 

137  IF  Q=0  THEN  E=104  +VAL(W)  ELSE  E=120+VAL(W) 

138  GOSUB  93 

139  Z(L)=A(2 )+A(l ) 

140  IF  Y(L)<>  THEN  PRINT  Y(L)+Z(L)  ELSE  PRINT  Z(L) 

141  GOTO  80 

142  END 

143  W=MID$(T , (B+3 ) , 1 ) 

144  IF  VAL(W)<2  GOTO  147 


145  ERS=ERS+1 

146  U(L)»”R  EXCEEDS  1  :GOTO  80 

147  IF  Q«0  THEN  E=96+VAL(W)  ELSE  E=112+VAL(W) 

148  GOTO  138  :  END  „ 

149  IF  INSTR{8,T,  A,  )=0  GOTO  163 

150  B«INSTR(8,Tf 

151  IF  INSTB(B,T,  ,R  )-0  GOTO  155 

152  W*MID$(T  ,  (B+2 )  ,1)  :  E=VAL(W) 

153  IF  E>7  GOTO  135 

154  E-88+E  :  GOTO  138 
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155  IF  INSTR ( B  ,T  =0  GOTO  15S 

156  W*MIE$(T,(B+3),1) 

157  IF  VAL ( W ) >1  GOTO  145 

158  S=80+7AL(W)  :  GOTO  13e 

159  IF  INSTR ( E ,T )=0  GOTO  164 

160  V=MII)$(T, (B+2) ,3)  :  E=VAL{W) 

161  IF  E>255  GOTO  129 

162  T(L)*"53‘‘  :  GOTO  138 

163  E=INSTR(8,T  ) 

164  IF  INSTR(8,T,  BUS,  ')=0  GOTO  168 

165  W=MlI$(T,(B+2)  ,3)  :  E=VAL(V) 

166  IF  E>255  GOTO  129 

167  Y(L)=”98”  :  GOTO  138 

168  IF  INSTR (8 ,T , ”P' )=0  GOTO  125 

169  IF  INSTR(8,T,”#”)=0  GOTO  178 

170  W-MIC$ (T , (B-l ) , 1 ) 

171  IF  VAL(W )<3  AN!  VAL(V)>0  GOTO  174 

172  SRS=ERS+1 

173  U(L)=” INCORRECT  PORT  #”:GOTO  80 

174  E=152+VAL ( W )  :  GOSUB  93 

175  Y ( L)=A (2  )+A (l ) 

176  V=MID$ (T , (B+2 ) ,3 )  :  E=VAL(W) 

177  IF  E>255  GOTO  129  ELSE  GOTO  136 

178  IF  lNSTR(8tT,"ANLD,')=e  OR  INSTR (8 ,T  ,  " , A”  )=0  GOTO  125 

179  W=MIL$(T,(B-1) ,1)  :  E=VAL(W)-4 
ie0  IF  E<0  OR  E>3  GOTO  172 

181  E=156+E  :  GOTO  138 

182  "CALL”— 

183  GOSUB  18S 

184  C=VAL(A(3))*2+1 

185  Y(L)®STR$(C )+  4” 

186  Y(L)=RIGHT$(Y(L)  ,2) 

187  GOTO  140 

188  ' — AEERESS  SUBROUTINE- 

189  IF  INSTR ( 18 ,T,”;”)=0  GOTO  191 

190  B=INSTR(18,T,  ) : W=MIE$ (T , 17 , (B-17) ) :GOTO  192 

191  W=MII$ (T , 17 ,8 ) 

192  FOR  M*0  TO  J-l 

193  IF  V-V (M)  GOTO  197 

194  NEXT  M 

195  ERS=ERS+1 

196  U(L)="LABEL-"+W+"-NOT  FOUNT”  :  GOTO  80 

197  E«B(M)  :  GOSUB  93 

198  Z(L)SA(2)+A(1) 

199  RETURN  „ 

200  ' — CLR  — 

201  IF  INSTR(13,T,  V)=0  GOTO  203 

202  Z(L)*”2?’  :  GOTO  140 

203  IF  INSTR(13,T , "C  ’  )*0  GOTO  205 

204  Z(L)*”57"  :  GOTO  140 

205  IF  INSTR(13,T,"F1  )*0  GOTO  207 

206  Z(L)>  A5  :  GOTO  140 

207  IF  INSTR(13,T,"F0")«0  GOTO  125 

208  Z(L)«"85  :  GOTO  140 
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209  "CPL  —  „  „ 

210  IF  INSTR ( 13  ,T ,  A  )=0  GOTO  212 

211  Z(L)="37“  :  GOTO  140 

212  IF  INSTR ( 13 ,T ,  C  ) =0  GOTO  214 

213  Z(L)="A7"  :  GOTO  £40 

214  IF  INST5( 13  »T ,  F0  )=0  GOTO  216 

215  Z(L)="95  :  GOTO  140 

216  IF  INSTR ( 13  ,T ,  FI  )=0  GOTO  125 

217  Z(L)="B5”  :  GOTO  140 

218  ' — EEC  — 

219  IF  INSTR{13,T,"  A  )=0  GOTO  221 

220  Z(L)="07"  :  GOTO  £40 

221  IF  INSTR(13,Tj,  „R  )=0  GOTO  125 

222  B-I NSTR( 13  ,T ,  R  ) 

223  W«MIE$(T,(B*1),1)  :  E=VAL(V) 

224  IF  E>7  GOTO  135 

225  E=E+200  :  GOTO  138 

226  '—IIS _ 

227  IF  INSTR ( 13 ,T , "  i”  )  =  0  GOTO  229 

228  Z(L)="l5"  :  GOTO  140„ 

229  IF  INSTR( 13  ,T ,  TCNTI  )=0  GOTO  125 

230  Z(L)=”35*  :  GOTO  140 

231  '  EJNZ-- 

232  3=INSTR(13,T,  ,  ) 

233  W*MIE$(T,(B-1) ,1)  :  E=VAL(W) 

234  IF  E>7  GOTO  135 

235  E=E+232  :  GOSUB  93 

236  T(L)=A(2)+A(1) 

237  W=MIE$ (T , ( B+l ) ,8 ) 

238  FOR  M=0  TO  J~1 

239  IF  V=V(M)  GOTO  242 

240  NEXT  M 

241  GOTO  195 

242  E=*E(M)  :GOSOB  93sZ(L)»A(2)+A(  1 )  sGOTO  140 

243  EN — 

244  IF  INSTR(13,T,  TCNTI  )=0  GOTO  246 

245  Z(L)="25’  :  GOTO  140 

246  IF  INSTR ( 13, T,”  i"  )=0  GOTO  248 

247  Z(L)="05"  :  GOTO  1$0 

248  IF  INSTR(13,T,  CLK  )*0  GOTO  250 

249  Z(L)=”75"  :  GOTO  140 

250  IF  IN5TR(8 ,T , ”ENI" )*0  GOTO  125 

251  GOTO  81 

252  ' — IN — 

253  IF  INSTB(13,TA"4,P  )=0  GOTO  125 

254  B*INSTR<13,T,  P  ) 

255  W*MID$ (T, (B+l ) , 1 )  s  E=7AL(W) 

256  IF  E>2  GOTO  172 

257  E*E+8  :  GOTO  138 

258  '—INC  — 

259  IF  INSTR (13,T,  A  )*0  GOTO  261 

260  Z(L)»"17  :  GOTO  140 

261  B*INSTR(l3,Tf"R)w 

262  IF  INSTR(13,T,  R  )*0  GOTO  266 
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263  W*MIE$  (T  ,  (B+l )  »1 )  :  E=VAL(W) 

264  IF  E>7  SOTO  135 

265  E«E+24  :  SOTO  136 

266  IF  INSTR ( 13 ,T  ,"OR  * )=0  SOTO  125 

267  W*MIE$ (T , (B+l ) , 1 ) 

268  E*VAL(W)  :  IF  E>1  GOTO  145 

269  E*E+16  J  GOTO  138 

270  JB— 

271  B*INSTR(8,T,"b’*  ) 

272  W=MID$ (T , (B+l )  f 1 )  :  S=VAL(¥) 

273  IF  E<8  GOTO  275 

274  ERS=EBS+1  :  0(L)="3IT  >  7” 

275  E*18+ ( E*32)  :  GOSUB  93 

276  T  (L  )®A  (2  )+A  (l ) 

277  GOSUB  189  :  GOTO  140 

278  ' — JC — 

279  T (L) =”F6" 

280  GOSUB  189 :GOTO  140 

281  * — JF — 

282  IF  INSTR(8,T,"JF0  ”)®0  GOTO  285 

283  Y(L)®"B6 

284  GOSUB  189:G0T0  140 

285  IF  IN5TR(8,T ,  *JF1  ")=0  GOTO  125 

286  T(L)='*76 

287  GOSUB  189:G0T0  140 

288  ' — JMP — 

2eS  IF  INSTR(8,T , "jMPP" )=0  GOTO  291 
250  Zd.)®"B3*  -.GOTO  140 
291  IF  INSTR(8,T,  "JMP  ’‘)*0  GOTO  125 
2S2  GOSUB  189 

293  E=VAL ( A(3 ) ) *2 : GOSUB  S3 

294  Y(L)=A(1)+'V  JGOTO  140 

295  ' — JN — 

296  IF  INSTR(8,T,"JNC  ”)®0  GOTO  298 

297  Y(L )®"E6” :GOSUB  189:G0T0  140 

298  IF  INSTR£8,T , "jNI  ”)»0  GOTO  300 

299  T(L)®"86  :GOSUB  189:G0T0  140 

300  IF  INSTR(8,T,"JNT0")*0  GOTO  302 

301  Y(L)*"26’ JGOSUB  189jGOTO  140 

302  IF  INSTR(8 ,T ,  JNTl")=0  GOTO  304 

303  Y(L)*"46":G0SUB  189JG0T0  140 

304  IF  INSTRJ[8 tT , ” JNZ  ”)«0  GOTO  125 

305  Y (L)**  96  JGOSUB  189:G0T0  140 

306 

307  IF  INSTR (8 , T,  **JTF  **)»0  GOTO  309 

308  Y(t)*"l6’  JGOSUB  18£:GOTO  140 

309  IF  INSTR(8,T,”JT0  ")»0  GOTO  311 

310  Y(L)«"36  JGOSUB  189JG0T0  140 

311  IF  INSTR(8,T,”JT1  ’)*0  GOTO  125 

312  r(£)-"56  JGOSUB  189 jGOTO  140 

313  JZ— 

314  T(L)«”C6" JGOSUB  189JC.T0  140 

315  MC7— 

316  IF  INSTR ( 13 »T ,”R" )®0  GOTO  342 
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317  B=INSTR(13,T,"R  ) 

3ie  W=MIE$ ( T ,  ( B+l ) ,  1 ) : E=VAL ( V ) 

319  IF  INSTR( 13 ,T ,  A,R')=0  GOTO  322 

320  IF  E>7  GOTO  135 

321  E=E+248:G0T0  138 

322  IF  INSTR{  13  ,T ,  **A  ,OR" )  =0  GOTO  325 

323  I?  E>1  GOTO  146 

324  E=E+240:GOTO  138  ..  „  .. 

325  IF  INSTR(13.T, *,A  )<>0  ANE  INSTR(13,T,  PR  )<>0  GOTO  329 

326  IF  INSTR(13,T,’\A")=0  GOTO  331 

327  IF  E>7  GOTO  135 

328  E=£+168:G0T0  138 

329  IF  E>1  GOTO  146 

330  5=E+160 :GOTO  138 

331  IF  INSTR (13 ,T )=0  GOTO  125 

332  IF  INSTR(13,T, “OR  )=0  GOTO  340 

333  IF  E>1  GOTO  146 

334  E=E+176 

335  GOSOB  93 

336  T(L)=A(2)+A(1) 

337  V=MIE$(T , (B+4)  ,3)  :E=VAL( W) 

338  IF  E>255  GOTO  129 

339  GOTO  138 

340  IF  E>7  GOTO  135 

341  2=2+184: GOTO  335 

342  IF  INSTR ( 13 ,T , ”A )=0  GOTO  348 

343  3=INSTR(13,T, 

344  T(L )=  23 

345  W=MID$ (T , (B+2  )  ,3)  :  2=VAL(¥) 

346  IF  E>255  GOTO  129 

347  GOTO  138 

348  IF  INSTR ( 13tT , "A tPSW" )=0  GOTO  350 

349  Z(L)  =  *'C7'‘:G0T0  140 

350  IF  lNSTR(13,T,”AtT  ')=0  GOTO  352 

351  Z(L)  =  '*42":G0T0  140 

352  IF  INSTR  t(13  ,T  ,  "PSW ,  A”  )=0  GOTO  354 

353  Z(I)=”D7’ 

354  IF  INSTR (13 ,T  , "T , A" ) =0  GOTO  125 

355  Z(L)=,'62":G0T0  140 

356  '-MOVE- 

357  B«INSTR(l3tT,  V) 

358  W=MIE$(T ,  (B+l ) ,1) :E=VAL( W)-4 

359  IF  E<0  OR  E>3  GOTO  172 

360  IF  INSTR ( 13 ,T » "A ,p")*0  GOTO  362 

361  E=l2+E:G0T0  138  „ 

362  IF  INSTR(13,T,",A  )=0  GOTO  125 

363  E*E+60:GOTO  138 

364  MOVP- 

365  IF  INSTR(8,Tf  MOVP  )=0  GOTO  367 

366  Z(L)*"A3" :GOTO  140 

367  IF  INSTR(8,T,"MOVP3")-0  GOTO  125 

368  Z(L)-"E3  JGOTO  140 

369  '-MOVE- 

370  B-INSTR(13,T,’V) 


371  W=MIE$(T,(E+1) ,1) :E=VAL(H) 

372  IF  E>1  GOTO  145 

373  IF  INSTH ( 13 ,T , ' A , OR  )=0  GOTO  375 

374  E=128+Ej GOTO  138 

375  IF  INSTR(13,T,",A’*  )-0  GOTO  125 

376  E=144+EjG0T0  138 

377  ' — ORI — 

378  B=INSTR(13,T,V‘) 

379  IF  INSTH(13,T.”,#’ )«0  GOTO  392 

380  W*MII$(T,(B+2) ,3) :E=VAL(W) 

381  IF  S>255  GOTO  129 

382  GOSOB  S3 

383  Z (L )«A (2 )+A  (1 ) 

384  IF  INSTR£i3,T,"A,*  )=0  GOTO  386 

385  T(L)  =  ”43  :GOTO  140  .. 

386  IF  INSTR( 13  ,T ,  EUS ,  )=0  GOTO  388 

387  T(L)=”88“:G0T0  140 

388  IF  INSTR(13,T,"  p"  )=0  GOTO  125 

389  W=MIE$ (T»(B-l)fl): E=V AL(W ) 

3S0  IF  E<1  OR  E>2  GOTO  172 

391  E=E+136:G0SUB  93 JY  (L  )=A  (2  ) +A  ( 1 ) :GOTO  140 

392  IF  INSTR(8 ,T , "CRLE  " )  =  0  GOTO  396 

393  W=MID$ (T  ,  ( B-l ) , 1 ) : E=YAL( V ) -4 

394  IF  E<0  OR  E>3  GOTO  172 

395  E=E+140 JGOSUB  93  : Y ( L) *A { 2 ) +A ( 1 ) :GOTO  140 

396  IF  INSTR( 13 ,T , ' A , R*  )-0  GOTO  400 

397  W=MU$(T,(i+2)  ,1)  :E*VAL(W) 

398  IF  E>7  GOTO  135 

399  E*E+72  :  GOTO  138 

400  IF  INSTR(13 ,T , "A ,0R  )=0  GOTO  125 

401  W=MIE$(T,(B+3) .1) :E=VAL(W) 

402  IF  E>1  GOTO  145 

403  E=E+64  :  GOTO  138 

404  ' — OUTL — 

405  IF  INSTR(13yTt  "BUS  ,.!")=0  GOTO  407 

406  Z(L)*”02’  :GOTO  140 

407  I?  INSTR (13  *T  * "  ,A" )=0  GOTO  125 

408  IF  INSTR(13,Ta"P0,A")<>0  GOTO  413 

409  B»INSTR( 13 ,T t  \") 

410  W*MIE$(T,(B-l),l) :E*VAL(¥) 

411  IF  £>2  OR  E<1  GOTO  172 

412  E*E+56jG0T0  138 

413  Z(L)»  90  JGOTO  140 

414  '--RET— 

415  IF  INSTR(8,T,  RETR  )=0  GOTO  417 

416  Z(L)«  S3  :GOTO  140 

417  IF  INSTR  (8,T»  *’RET  ")*0  GOTO  125 

418  Z(L)=”83  :GOTO  140 

419  RL— 

420  IF  INSTR(13,T.'  A  }«0  GOTO  125 

421  IF  INSTR (8, T,  RLC  )«0  GOTO  423 

422  Z(L)«"F7’  JGOTO  140 

423  IF  INSTR (8»T,"RL  ")*0  GOTO  125 

424  Z(L)-”E7  JGOTO  140 
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425  — RE —  „  „ 

426  IF  INSTR(12,T4  Aj=0  GOTO  125 

427  IF  INSTR(8 ,T «  RRC  )=0  GOTO  42S 

428  Z(L)="67  :GOTO  140 

429  IF  INSTR (8 ,T ♦ *RR  "N  GOTO  125 

430  Z ( L ) ="77' :GOTO  140 

431  ' — SEL — 

432  IF  INSTR  (12  fT ,  MB0  )=0  GOTO  434 

433  Z(L  )=**E5  :GOTO„140,.x 

434  IF  INSTR112.T,  MBl  )=0  GOTO  436 

435  Z(L)*"F5":GOTOf-140.. 

436  IF  INSTR (12 ,T,  RB0  )=0  GOTO  438 

437  Z(L)=”C5  :GOTO  140 

438  IF  INSTR(12,T, *RB1*  )=0  GOTO  125 

439  Z(L)=’*I5*  .’GOTO  140 

440  ' — STRT — 

441  IF  INSTRt(l3  ,T  ,  ’CNT  *  )=0  GOTO  443 

442  Z  (L  )=**45*  :GOTO  140 

443  IF  INSTR(13,T ,  T  )=0  GOTO  125 

444  Z(L)  =  '*55*:G0T0  140 

445  XCH  —  ,,  .. 

446  B=INSTR ( 12, T ,  R  ) 

447  W*MIE$(T,(B+1) ,1) :E=VAL(tf) 

448  IF  I NSTR (8, T, ”XCHL  *)=0  OR  IN5TR(12,T,  A, OR  )=0  GOTO  451 

449  IF  E>1  GOTO  145 

450  S=S+48:G0TC  138 

451  IF  INSTR( 12  ,T  ,  "A , R" )=0  GOTO  454 

452  IF  E>7  GOTO  135 

453  E=E+40 :GOTO  138 

454  IF  INSTR(l2,T.,,AtGR")=0  GOTO  125 

455  IF  E>1  GOTO  145 


456  E=E+32:G0T0  138 

457  '  XRL— - 

458  B=INSTR(12,T,  R  ) 

459  W=MIB$ (T , (B+l )  ,  1) s  E*VAL( W ) 

460  IF  INSTR( 12 , T  ,  A , R” )=0  GOTO  463 

461  IF  E>7  GOTO  135 

462  E=*E+216  :GOTO  138 

463  IF  INSTR(12,T,,’A,GR")*0  GOTO  466 

464  IF  E>1  GOTO  145 


465  E=E+208:GOTO  138 

466  IF  INSTR(12,TA”A.#")=0  GOTO  125 

467  B*INSTR(12,T,  #  ) 

468  W=MII$ (T , (B+l ) ,3) :E*VAL(W ) 

469  IF  E>255  GOTO  129 

470  Y(L)*"l3”:G0T0  138 


••  •« 


471  END 

472  '—LINE  PRINT  LISTING- 

473  LPRINT  :LPRINT  ASSEMBLY  OF 

474  LPRINT  mJ  .  .  . 

475  LPRINT  ..LINE..+  +  gSg  +  „  „+  CODE  + 

♦  OPCODE  +  ♦  OPERAND  +  %  COMMENTS 


; Y5 . +  *  COMPLETED” 

n  _  __ _  H  •• 

+  LAB&L  + 


476  FOR  N«0  TO  M  ,  v  , 

477  LPRINT  N+lf*TAE(6)  HX$  (  N )  »TAB  ( 12  )  Y(N)+Z(N) 


JTAB(19)  X(N) 
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47  S  IF  L2N(U(N))<>0  LPRINT  'J  ( N ) 

47S  NEXT  N 

480  LPRINT 

481  LPRINT  "SYMBOL  TABLE:" 

482  LPRINT 

483  FOR  M=0  TO  J 

484  IF  LEN(y(M))<>0  LPRINT  V  (M) » " -  +SX$ ( M) 

485  NEXT  M 

486  IF  ERSOe  GOTO  49e 

487  LPRINT 

488  LPRINT  TAB(  30 )  ”»>  NO  ASSEMBLY  ERRORS  EETECTEE  «< 
48S  GOTO  492 

490  LPRINT  :LPRINT  ERSi"  ERRORS  rETECTEE" 

491  RON"MASTER" 

492  Y=Y+”o" 

493  OPEN  "O  ’  ,  1 ,  Y 

494  FOR  M=0  TO  J 

495  IF  LEN ( Y (M) )=0  GOTO  497 

496  PRINT  #1 ,Y (M) 

497  PRINT#1 ♦ Z(M ) 

498  NEXT  M 

499  CLOSE 

500  RUN  "PROGRAM” 
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APPENDIX  I 


Programming  Program  -  "PROGRAM" 


1  '****PR0GRAM**** 

2  ' - EPROM  ROUTINE - 

3  CLEAR  1 0000 

4  EEFINT  A,I,J,K,M,N,0,Q,P 

5  DEFSTR  W,X,Y,Z 

6  IIM  E ( 1024)  ,T (1024) , X( 1024 ) 

7  C=0 

8  LINE  INPUT  "ENTER  PROGRAM  M0IE--”;Y 

9  IF  Y="ST0P"  ENE 

10  IF  Y=”EIIT"  RUN"EETASM" 

11  IF  y="rprom"  GOTO  9e 

12  IF  LEFT$(Y,5)="WPR0M”  GOTO  16 

13  PRINT  "ILLEGAL  COMMANE-TRY  AGAIN" 

14  GOTO  8 

15  ' - WPROM  ROUTINE - 

16  Z*MID$ (Y ,7 , 11 ) 

17  IF  RIGHTS ( Z  ,  1 ) *”0”  GOTO  20 

18  PRINT  "OBJECT  COEE  ONLY!  AID  0  TC  FILE  NAME" 

19  GOTO  8 

20  OPEN  V.l.Z 

21  FOR  1*0  TO  1024 

22  INPUT  #1,1(1) 

23  IF  EOF(l)  THEN  25 

24  NEXT  I 

25  CLOSE  :  J=I 

26  GOSUB  65 

27  GOSUB  148 

28  OUT  4,4 

29  OUT  4,20 

30  FOR  M=1  TO  Q 

31  CUT  2,N1 

32  OUT  4,21 

33  OUT  1,11 

34  OUT  4,81 

35  OUT  1 ,D (M) 

36  OUT  4,209 

37  OUT  4,221 

38  GOSUB  58 

39  OUT  4,209 

40  OUT  4,81 

41  OUT  4,84 

42  OUT  4,116 

43  T(M)*INP(3) 

44  OUT  4,20 

45  11*11+1 

46  IF  110256  CR  110512  OR  110768  GOTO  48 


47  N1=N1+1 

46  IF  E(M)=T(M)  GOTO  51 

43  PRINT  'PROGRAMMING  ERROR-ERAS I  EPROM  AM  TRY  AGAIN" 

50  GOTO  53 

51  NEXT  M 

52  PR I  NT" PROGRAMMING  COMPLETE!  SATISFACTORILY” 

53  OUT  4,36 

54  PRINT  "REMOVE  EPROM  NOW-THEN  TURN  POWER  OFF" 

55  GOTO  8 

56  ENE 

57  ' - 50  MSEC  EELAI - 

58  A=A+1 

59  'DELAY 

60  IF  A<2  GOTO  58 

61  A=0 

62  RETURN 

63  END 

64  ' - HEX  TO  EEC  CONVERSION  — 

65  FOR  K=0  TO  J 

66  W(0 )®LEFT$ (X (X ) , 1 )  :  W ( 1 ) =MIE$ (X(X ) , 2, 1 ) 

67  FOR  N=0  TO  1 

68  if  w(n )=;>;;  a( n )=e> 

63  IF  W(N)=  1  A ( N )=1 

70  IF  W ( N ) =2"  A ( N ) =2 

71  IF  W(N)«"3"  A ( N  )=3 

72  IF  W(N)=”4  A{ N ) =4 

73  IF  W  ( N  )  =  " 5 "  A  (  N  )  =5 

74  IF  W(N)="6"  A ( N ) =6 

75  IF  W  (  N  )  -  '7'  A  (  N  )  =7 

76  IF  W  (  N )  A  (  N ) =8 

77  IF  W(N)="s"  A ( N ) =9 

78  IF  W ( N ) ="A  A{N)=10 

79  IF  W ( N ) =" E"  A( N )=11 

80  IF  W(N)=V  A  { N  )=12 

81  IF  W(N)="E’  A ( N  )  =  13 

82  IF  W(N)  =  ”S  ’  A ( N ) =14 

83  IF  W(N)="F"  A( N ) =15 

84  IF  LEN ( W ( N ) ) =0  A(N)=0 
65  NEXT  N 

86  E(K)=16*A(0)+A(1) 

87  NEXT  l 

88  RETURN 

89  ' - READ  PROM  ROUTINE - 

90  GOSUB  148 

91  OUT  4,4 

92  OUT  4,20 

S3  FOR  M=1  TO  (Q+l) 

94  OUT  2 ,  N1 

95  OUT  4,21 

96  OUT  1,11 

97  OUT  4,85 

98  OUT  4,84 

99  OUT  4,116 

100  T(M)»INP(3) 
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101  OUT  4,84 

102  OUT  4,20 

103  11=11+1 

104  I?  Il<256  GOTO  107 

105  11=11-256 

106  N1=N1+1 

107  NEXT  M 

108  OUT  4,36 

109  FOR  N=1  TO  C+l 

110  E=T ( N ) 

111  N1=FIX(E/16) 

112  F( 1 )=E-( 16*N1 ) 

113  N2*FIX(N1/16) 

114  F(2)=N1-(16*N2) 

115  N3*FIX(N2/16) 

116  F(3)=N2-(16*N3) 

117  FOR  P*1  TO  2 

118  IF  F(P  )=0  THEN  ¥(P)  =  V 

119  IF  F( P)  =1  THEN  W(P)="l' 

120  IF  F(P)=2  THEN  ¥(P)="2' 

121  IF  F(P)*3  THEN  ¥(P)="3* 

122  IF  F ( P ) *4  THEN  ¥(P)  =  V 

123  IF  F(P)=5  THEN  ¥(P)  =  ’*5" 

124  I?  F(P  )=6  THEN  ¥(P)  =  "e’‘ 

125  IF  F ( P ) =7  THEN  W(P)**V 

126  IF  F ( P ) =8  THEN  ¥(P)="8' 

127  IF  F(P)*9  THEN  W(P)=V 

128  IF  F (P  )=10  THEN  ¥(P)=*V 

129  IF  F(P)=11  THEN  ¥(P)="B’ 

130  IF  F(P)*12  THEN  ¥(P)«"c’' 

131  IF  F(P)=13  THEN  ¥(P)="l" 

132  IF  F(P)=14  THEN  ¥(P)=”E 

133  IF  F(P)=15  THEN  ¥(P)="F” 

134  NEXT  P 

135  X( N )*¥(2 )+¥ ( 1 ) 

136  NEXT  N 

137  GOSUB  139 
133  GOTO  53 

139  0=1 

140  PRINT  U;TO(6)  X(Q)+"  ”+X(Q  +  l)+”  ”+X(0+2) 

♦X(0+4)+  +X(0+5)+  +X (0+6 )+  +X (0+7  )♦ 

"+X(0+9)  +  "  "+X( 0+10)+’*  "+X(C+11)+”  "+X(0+12)+" 
"+X(0+14)+”  "+X (0+15) 


141  0=0+16 

142  IF  0>0+1  GOTO  144 

143  IX*IX+16  :  GOTO  140 

144  PRINT 

145  RETURN 

146  END 

147  ' - SETUP  ROUTINE - 

148  Nl-0 

149  PRINT  "START  ADDRESS  IN  DECIMAL? 

150  INPUT  II 

151  IF  IK1024  GOTO  153 


+  ”  "+1(0+3)+’' 
+X (0+8 )+" 
"+X( 0+13 )  +  " 
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152  PRINT  "ILLEGAL  ALLRESS"  :  GOTO  149 

153  PRINT  ’*ENL  ALLRESS  IN  LECIMAL? 

154  INPUT  12  :  Q=I2-I1 

155  IX  =  I1 

156  IF  Il>255  GOSUB  172 

157  IF  Q<0  GOTO  152 

158  IF  I2<1024  GOTO  160 

159  PRINT  'ILLEGAL  ALLRESS*'  :  GOTO  153 

160  LINZ  INPUT  "EPROM  SOCKET  EMPTY? (TE3  OR  NO):  ";X3 

161  IF  X3='*NC'  GOTO  160 

162  LINE  INPUT  ’*IS  SOCKET  POWER  SWITCH  ON?  (YES  OR  NO): 

163  IF  X4="NO"  GOTO  164  ELSE  GOTO  165 

164  PRINT  "TURN  POWER  ON”  :  GOTO  162 

165  OUT  4,36 

166  IF  LEFT$(Y,5)O"WPR0M"  GOTO  169 

167  PRINT:  PRINT 'FOLLOWING  IS  HEX  CODE  TO  BE  PRCGRAMMM 

168  GOSUB  139 

169  LINE  INPUT  "INSERT  8748  CHIP  AND  TYPE-GO:  "?X5 

170  IF  X5O‘’G0"  GOTO  169 

171  RETURN 

172  IF  Il>511  GOTO  174 

173  Nl-1:  11=11-256:  RETURN 

174  IF  II >767  GOTO  176 

175  Nl=2:  11=11-512:  RETURN 

176  Nl=3 :  11=11-768 

177  RETURN 


APPENDIX  J 


Sample  Assembler  Printout 


ASSEMBLY  C? 

'LOU'S  5 

'  COMPLETE! 

LINE 

HEX 

COLE 

LABEL 

CPCOLE 

OPIEANI 

COf'MENTS 

1 

00 

ORIS 

0££ 

2 

000 

0405 

JMF 

START 

t  PO'VER  UP 

3 

002 

00 

NOP 

4 

003 

0428 

JMP 

INT 

> INTERRUPT 

5 

005 

£344 

ST ALT: 

MOV 

R0 .*6£ 

6 

007 

38  7F 

MCV 

Ri  *12? 

7 

008 

BA0I 

MOV 

R2  *13 

6 

00B 

BB0A 

MOV 

R3,*ie 

9 

00L 

£0 

NOP 

10 

00  4 

£0 

NOP 

11 

00? 

£0 

NOP 

12 

010 

25  £  1 

MOV 

A  #01 

13 

012 

2A 

OUTL 

P2 ,  A 

JHI-Z  ON  IS' 

14 

013 

00 

NOP 

15 

014 

25?F 

MCV 

A  *255 

16 

016 

3S 

OUTL 

PI  A 

» ENABLES  F 1 

17 

017 

00 

NCP 

ie  . 

013 

£1 

MCVX 

A  C°R1 

;  sus  tc  :;i- 

19 

018 

£0 

NGP 

2e 

01A 

75 

ENT0 

CLK 

*  MAKES  T0  A 

21 

01B 

05 

EN 

I 

22 

01C 

00 

NOP 

23 

01L 

£0 

NOP 

24 

01E 

00 

NOP 

25 

01? 

£0 

NOP 

26 

020 

00 

LOOP: 

NOP 

27 

021 

F6 

MOV 

A .  R0 

28 

022 

38 

OUTL 

PI  A 

» ENABLE  8212 

2S 

023 

0420 

JMP 

LOOP 

;loo? 

30 

025 

£0 

NOP 

31 

026 

00 

NOP 

32 

027 

ee 

NOP 

33 

028 

2366 

INT: 

MOV 

A  *102 

J INTERRUPT 

34 

02A 

39 

OUTL 

Pi  .A 

JSTOP  TRS-S0 

35 

023 

£S 

INS 

A ,  BUS 

; INPUT 

36 

02C 

58 

ANL 

A.  Rl 

;7  BITS? 

37 

02£ 

LA 

XRL 

A.R2 

; CHECK 

38 

022 

£0 

NOP 

39 

02? 

00 

NOP 

40 

030 

8642 

JNZ 

STOP 

{END  I?  NO  Ci 

41 

032 

00 

UNTIL: 

NOP 

42 

033 

£632 

JNI 

UNTIL 

;loo?  til  EOi 

43 

035 

00 

NCP 

44 

036 

00 

NOP 

45 

037 

2333 

MCV 

A. *51 

98 


ao 

ei 

54 

043 

00 

55 

044 

8543 

56 

046 

00 

57 

047 

564B 

58 

049 

0446 

53 

60 

04B 

33 

arur:  rovx 

BACK:  NCP 

JNI 

WAIT:  NOP 

JT1 
JMP 

READY:  BETR 
END 


A  0R1  {BJS  TO  dl -Z 

BACK  JLOOP  TIL  EOC=l 

READY  {JUMP  TO  04A 

WAIT  {LOO? 

{RETURN 


SYMBOL  TABLE : 


START - 005 

LOOP - 020 

I  NT - 028 

UNTIL-— 032 

STOP - 042 

BACK - 043 

WAIT - 046 

READY - 24B 


>»  NO  ASSEMBLY  EnBORS  DETECTED  « << 
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